2016-11-11 4 views

答えて

1

StackOverflowで質問を送信する前に検索してください。この質問には複数の回答があり、十分な背景も含まれていませんでした。
Excelは開いていますか?
Excelも作成されていますか?
I Excelの新しいインスタンスを作成し、特定のセルにテキストを書き込むコードを添付します。

Private Sub Button_Click() 
Dim objExcel As Excel.Application 
Dim objSheet As Excel.Workbook 

Set objExcel = New Excel.Application 
Set objSheet = objExcel.Workbooks.Open("C:\MyExcelfile.xlsx") 

objExcel.Range("C6").Value = "Some text to write here" 
objExcel.Range("D7").Value = me.textboxSomething.value 

objSheet.save 
Set objSheet = Nothing 
objExcel.Quit 
Set objExcel = Nothing 
End sub 

エラーが発生した場合は、エラー処理が必要です。
ツールメニューのアクセスvbaエディタで、「Microsoft Excel 1#.0 Object Library」の参照を追加する必要があります。

関連する問題