<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<oembed>
  <author_name>ken3memo</author_name>
  <author_url>https://blog.hatena.ne.jp/ken3memo/</author_url>
  <blog_title>三流君のソースコード置き場</blog_title>
  <blog_url>https://ken3code.hatenablog.jp/</blog_url>
  <categories>
    <anon>PowerPoint</anon>
    <anon>Excel</anon>
  </categories>
  <description>あとで、解説を書く まず、コードを質問者さんへ送るソースコード: Option Explicit '起動済みの既存 パワーポイントのスライドから 'パワポのシェイプ情報をexcelシートへ書き出す 'ex:新規ブックを追加して、pp:スライドの情報をex:シート単位で貼り付ける '2024/04/04 シェイプでHasChart = True だったら、グラフの情報を書きだす Const 基準セル = &quot;B2&quot; Sub test20240404_01ppスライドをexシートへグラフ情報付きで書き出す() Dim ppApp As Object 'As PowerPoint.Applicatio…</description>
  <height>190</height>
  <html>&lt;iframe src=&quot;https://hatenablog-parts.com/embed?url=https%3A%2F%2Fken3code.hatenablog.jp%2Fentry%2F2024%2F04%2F04%2F065354&quot; title=&quot;test20240404_01ppスライドをexシートへグラフ情報付きで書き出す - 三流君のソースコード置き場&quot; class=&quot;embed-card embed-blogcard&quot; scrolling=&quot;no&quot; frameborder=&quot;0&quot; style=&quot;display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;&quot;&gt;&lt;/iframe&gt;</html>
  <image_url></image_url>
  <provider_name>Hatena Blog</provider_name>
  <provider_url>https://hatena.blog</provider_url>
  <published>2024-04-04 06:53:54</published>
  <title>test20240404_01ppスライドをexシートへグラフ情報付きで書き出す</title>
  <type>rich</type>
  <url>https://ken3code.hatenablog.jp/entry/2024/04/04/065354</url>
  <version>1.0</version>
  <width>100%</width>
</oembed>
