在文本框中的格式編號在ppt中通過vba

我已經通過VBA連接Excel和Powerpoint以將值從Excel工作表發送到PPT。在文本框中的格式編號在ppt中通過vba

除了一件事情之外，所有工作都很好：我需要將值從Excel中的單元格轉移到ppt中的文本框形狀，同時保留excel中的數字格式。我怎麼做？

我這樣做了大約10個這樣的盒子和我現在的代碼，使用Excel複製和粘貼在Powerpoint中，不斷髮出隨機地方的範圍錯誤。

將粘貼我在短時間內使用的代碼。

等着看你的代碼。你如何從Excel複製到PPT文本框？ –

嘗試使用Excel的numberFormat，當您將Value帶過來時。

例子：

With Workbooks(1).Sheets(1).Range("A1") 
    valueToPaste = Format(.Value, .NumberFormat) 
End With

對於這個例子起見，我假裝你是從Excel中調用這個，只需要知道如何提取的價值與它的格式。我們在範圍A1中使用第一個工作簿的第一張。它應該很容易更新到您的特定需求。

可能有一些例外，特別是對於自定義格式，但這應該適用於您在Excel中使用的大多數格式。

2012-09-25 03:03:10

*我假裝你是從Excel中調用這個函數* - 爲什麼？問題是關於Powerpoint，所以它應該解決這個問題，而不是一個更簡單但不相關的解決方法。 – brettdj

@brettdj由於OP沒有指定，如果從PowerPoint中完成，該方法會略有不同，因此我指出了我正在使用哪個調用程序。 –

我按規定閱讀它。 *需要將數值從Excel中的單元格傳輸到ppt中的文本框形狀* – brettdj

回答