投稿日 | : 2005/02/17(Thu) 10:38 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re^3: ありがとうございます |
> 早速の回答ありがとうございます。
> この方法はコマンドボタンが必要になるのでしょうか?
サンプルを提示したのですから自分で試して下さい。
Private Sub Timer1_Timer()
'又は Command1.Value = True
Text1.Text = xlSheet.Cells(1, 1)
End Sub
> よければ、ExcelとのDDE通信の方法も、教えていただけないでしょうか?
ここの[当サイト内・外の検索]から[Excel DDE通信]をキーワードにGoogle等で検索して見て下さい。
少しは自分でも努力しないと上達は望めませんよ。
Form に Label を1個貼り付け下記のコードを貼り付けて下さい。
前もって別途 Excel を立ち上げておいて下さい。
Option Explicit
Private Sub Form_Load()
With Label1
.LinkTopic = "Excel|Sheet1"
.LinkItem = "R1C1"
.LinkMode = vbLinkAutomatic
End With
End Sub
上記プログラムを実行後、Excelのセル A1 に何か書き込んでから VBのForm を見てみて下さい。