Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

33282 / 76732

←次へ　｜　前へ→


	【48673】Re:関数の値の共有

勉強中 - 07/5/1(火) 10:39 -


	引用なし

	パスワード

▼ichinose さん：
ありがとうございます。
以下のとおりです。

Sub A()
　　Dim dtBfr1 As String
　　Range("z5").Select
　　dtBfr1 = ActiveCell.Value　　←dtBfr1は更新前のデータです。
　　ActiveWorkbook.RefreshAll　　←ここでデータ更新します。（外部データ）
　　Application.OnTime Now + TimeValue("00:00:20"), "B"　←「Sub Bを呼びま　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　す」
End Sub

Sub B()
　　Dim dtAftr1 As String
　　Range("z5").Select
　　dtAftr1 = ActiveCell.Value　　　←dtAftr1は更新後のデータです。
　　If dtBfr1 <> dtAftr1 Then　　　 ←データが変更されている場合は変更後の　　　　　　　　　　　　　　　　　　　データを音声で読みあげたいのですが、　　　　　　　　　　　　　　　　　　　ここでdtBfr1の値が「empty」となってし　　　　　　　　　　　　　　　　　　　まいます。
　　　　Application.Speech.Speak (dtAftr1)
　　End If
End Sub

>▼勉強中さん：
>おはようございます。
>
>>「sub　前回」　の中で関数Aの値を"100"と定義したとします。
>>「sub　今回」の中でも関数Aの値を反映させたいのですが、Aの値はEnptyとなってしまいます。「sub　今回」の中でも関数Aを反映させる方法はないのでしょうか。
>
>この記述だけで勉強中さんがおっしゃっていることが
>この質問を見ている方に再現できると思いますか？
>
>勉強中さんの記述どおりに操作すれば、上記の現象が再現できる
>ドキュメントが必要です。
>
>再度、投稿してみて下さい。

3 hits

▼

【48671】関数の値の共有 勉強中 07/5/1(火) 7:11