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

    GUIDを作成するVBScript

    Office アドインを作成するのに必要(マニフェストのId要素)なG…

  2. VBScript

    Microsoft Edgeのバージョン情報をクリップボードにコピーするVBScript

    前回の記事に引き続き、自分の手間を減らすためのスクリプト、今回はMic…

  3. Office関連

    Wordのテンプレートをインストールするスクリプト

    Wordマクロをテンプレートにして使用する場合、通常そのテンプレートフ…

  4. VBScript

    指定したフォルダ内のemlファイルの情報をリスト化するVBScript

    emlファイルから件名や本文、宛先や送信日時といった各種情報を取得して…

  5. VBScript

    動画回転用簡易FFmpegフロントエンド

    アーケードゲームのプレイを録画した際、機器によっては録画した動画の向き…

コメント

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

Time limit is exhausted. Please reload CAPTCHA.

Translate

Chinese (Simplified)Chinese (Traditional)EnglishFrenchGermanJapaneseKoreanRussianSpanish

最近の記事

アーカイブ

PAGE TOP