VBScript

クリップボードに文字列をコピーする

2012/4/3 追記:関連記事として「clipコマンドを利用してクリップボードに文字列をコピーするVBScript」を追加しました。

Internet Explorerを使って文字列をクリップボードにコピーするVBScriptです。

Option Explicit

Dim s

s = "a" & vbTab & "b" & vbTab & "c"
PutInClipboardText s
MsgBox "文字列をクリップボードにコピーしました。" & vbCrLf & "文字列:" & s

Public Sub PutInClipboardText(ByVal str)
  Dim txt
  
  With CreateObject("InternetExplorer.Application")
    .Visible = False
    .Navigate "about:blank"
    
    While .Busy Or .ReadyState <> 4
      WScript.Sleep 10
    Wend
    
    Set txt = .document.createElement("textarea")
    txt.Value = str
    .document.body.appendChild txt
    txt.Focus
    Set txt = Nothing
    
    .ExecWB 17, 0
    .ExecWB 12, 0
    .Quit
  End With
End Sub

スクリプトでクリップボードにテキストを設定する。」参照

Windowsのバージョン情報を取得する前のページ

ファイル選択ダイアログ次のページ

関連記事

  1. VBScript

    【Illustrator】指定したPDFプリセットでAIファイルをPDFに一括変換するVBScrip…

    前回の記事で、Illustratorに登録されたPDFプリセットを列挙…

  2. Office関連

    「2014年12月のWindows Update以降コマンドボタンが使えなくなった」トラブルへのFi…

    当ブログでも「KB2553154の更新プログラムをアンインストールする…

  3. VBScript

    Internet Explorerのお気に入りを列挙するVBScript

    Internet Explorerのお気に入りにどの位のインターネット…

  4. Windows 10

    Microsoft Edgeを操作するVBScript

    「Microsoft Edgeを操作するVBAマクロ(WebDrive…

  5. VBScript

    [クライアント管理]WMI Explorerの紹介

    端末のハードウェア情報やインストールされているソフトウェアなどを調べる…

コメント

  1. この記事へのコメントはありません。

Time limit is exhausted. Please reload CAPTCHA.

Translate

最近の記事

アーカイブ

PAGE TOP