-PR-
mikasa007

エクセルVBAで、マクロを作成中なのですが、
別のアプリケーションを動作させなくてはいけないため、
SendKeysを使用します。

この SendKeys "○○○"で、
コマンドや文字を指定することは、できますが、
エクセルのある決まったセルに入っている文字をそのまま、
ここに指定(つまりは、変数)するのには、どういう記述方法になりますか?

例えば、A1のセルに「XYZ」と入っていたら、
SendKeys "XYZ"と送るイメージになりますが、このXYZ部分を、
A1セルの文字という変数にしたいです。

いろいろ調べたのですが、わかりませんでした。
すみませんが、みなさん、よろしくお願いいたします。
  • 回答数2
  • 気になる数0

Aみんなの回答(全2件)

質問者が選んだベストアンサー

  • 2013-07-07 02:17:49
  • 回答No.1
そのままですよ。

 Application.SendKeys Range("A1")

でいけます。
お礼コメント
ありがとうございます。こんなに簡単な記述でできるとは、驚きです^^
助かりました!
投稿日時 - 2013-07-07 03:07:46
  • 同意数0(0-0)
  • ありがとう数0
-PR-
-PR-

その他の回答 (全1件)

  • 2013-07-07 02:50:03
  • 回答No.2
状況によりますが安全を取って、事前に変数に受けてから送り出してみます。 作成例: sub macro1() dim s as string dim res s = range("A1").value res = shell("Notepad.exe", vbnormalfocus) sendkeys s end sub ...続きを読む
状況によりますが安全を取って、事前に変数に受けてから送り出してみます。

作成例:
sub macro1()
dim s as string
dim res
s = range("A1").value
res = shell("Notepad.exe", vbnormalfocus)
sendkeys s
end sub
お礼コメント
ありがとうございます!
このような方法もあるのですね。こちらでも、できそうです!
一度変数に置いておけば、のちに便利なこともあるので、今後使ってみます。
投稿日時 - 2013-07-07 03:09:37
  • 同意数0(0-0)
  • ありがとう数0
なるほどぉ、役に立ったなど
感じた思いを「ありがとう」で
伝えてください
  • 回答数2
  • 気になる数0
  • ありがとう数0
  • ありがとう
  • なるほど、役に立ったなど
    感じた思いを「ありがとう」で
    伝えてください

関連するQ&A

-PR-
-PR-

その他の関連するQ&Aをキーワードで探す

別のキーワードで再検索する

あなたの悩みをみんなに解決してもらいましょう

  • 質問する
  • 知りたいこと、悩んでいることを
    投稿してみましょう
-PR-
-PR-
-PR-

特集


士業をはじめとする専門家が回答するQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ