powerpoint-vba

0熱

2答えて

私は表示したり隠したりするオブジェクト（矢印と長方形）を持つPowerPointスライドをいくつか持っています。現時点では私はちょうど今、それは1つの長方形または矢印は、そのテンプレートで削除されなければならないことをすることができ ActivePresentation.Slides("Slide100").Shapes("Rectangle 99").Visible = False or Tru

1熱

1答えて

VBAのチャート変数にPowerPointチャートを割り当てることができないのはなぜですか？

現時点では、私は指示書hereに従ってみようとしていますが、以前にこの問題を抱えていました。何らかの理由で、PowerPointチャートを宣言されたChart変数に割り当てることができません。 .HasChartを使用して、確かにそこにチャートがあり、Shapes（i）.Typeを使用してShapeがチャートタイプであることを確認しましたが、ランタイムエラー '13'が発生します：タイプ毎回不一致

1熱

1答えて

図形を選択してマクロを実行して色を塗る方法は？

私は形状を選択し、そのようなPowerPointプレゼンテーションでの色でこの形状を埋めるためにしようとしています（私は緑のボタンの上に私のコードを置く）： Sub ChangeInRed() If ActiveWindow.Selection.Type = ppSelectionNone Then MsgBox "Please selecte a zone !"

-1熱

1答えて

アプリケーションを見ずにExcel VBAでPowerPointを作成する方法

Excel VBAから新しいPPTを作成する方法を知りたいですが、作成中にアプリケーションを見ずに新しいPPTを作成できます。私はいくつかの洞察を見つけましたが、それは既存のPPTファイルを開くときにのみ機能しますが、新しいファイルを作成しています。 PowerPoint.Applicationに.Activeを呼び出す Dim pptApp As PowerPoint.Application

-1熱

2答えて

.Selectメソッドを使用せずにExcelからPowerPoint VBAに画像を貼り付ける方法

Excel文書のデータを使用してExcel VBAからPowerPointを作成するコードを作成しています。このドキュメントでは、IMGと呼ばれるシートがあります。ここには、「ピクチャX」という名前の一連のイメージがあり、Xは現在のピクチャの番号です。これらの画像をコピーしてそれぞれのPowerPointスライドに貼り付けるコードは、.Selectメソッドを使用しています。これは、ここで読んだこと

1熱

1答えて

ExcelからPowerpointへのフォント書式設定を維持

ExcelからグラフをPowerPointに貼り付けるVBAマクロがあります。同じワークシートの特定のセルのセル内容をPowerPointにコピーするようにマクロを調整しました。マクロをコピーする前に、PowerPointテンプレートと同じフォントサイズに設定しても（40ポイント）、マクロは実行前にExcelで設定した40ポイントではなく18ポイントで貼り付けられます。次のようにこのすべてを処

1熱

2答えて

パワーポイントにExcelデータを貼り付ける方法とデータを編集できるようにする

ユーザーが結果を編集できるようにしながら、エクセル範囲をパワーポイントにエクスポート/ペーストする方法があるのだろうかと思っていました。私がインターネット上で見ているコードは、パワーポイントからExcelのデータをペイントしてペーストします。以下はその例です： Sub export_to_ppt(ByVal sheetname As String, ByVal initialSelection A

0熱

1答えて

PowerPoint：選択した図形のグループ化が無効になっています

スライドにいくつかの図形を追加し、提供されたコードと一緒にグループ化します。 ' Inserting shapes like this Set sld = Application.ActiveWindow.View.Slide Set sDesc = sld.Shapes.AddTextbox(msoTextOrientationHorizontal, startX, picStartY, b

1熱

2答えて

選択した上でチャート（または範囲）を介してループパワーポイントスライド

私は現在、私のPowerPointプレゼンテーション内のすべてのリンクを更新するには、このコードを使用しています： Sub UpdateLinks() Dim ExcelFile Dim exl As Object Set exl = CreateObject("Excel.Application") ExcelFile = "C:\Users\J\Documents\Reporting

1熱

1答えて

20以上の変数がPowerPointプレゼンテーションのパフォーマンスに影響しますか？

私は、学生がマッチする活動、複数の選択肢のクイズなどを完成させるインタラクティブなPowerPointプレゼンテーションを作成しています。プレゼンテーションは、各学生の進歩を記録し、平均を更新し、各タイプの質問/アクティビティ。私は素晴らしい仕事をして5つの未満のパブリック変数を使用小さく、シンプルなファイルを作りました。これまでのところ、このプレゼンテーションでは、いくつかの手続きのために、約