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

    実行中のアプリケーション一覧を出力するVBScript

    「VBS アプリ一覧 出力」というキーワード検索での訪問があったので、…

  2. VBScript

    Expression WebでVBScriptのコードを書いてみる。

    今日たまたま下記の記事を見つけました。10年近く前の古い記事です。…

  3. Office関連

    ドラッグ&ドロップでExcelのアドインを登録するVBScript

    「ドラッグ&ドロップでWordのテンプレートを登録・解除する(VBS)…

  4. Windows関連

    Lhaplusのバージョンを取得するVBScript

    およそ2年ぶりに圧縮・解凍ソフトの「Lhaplus」がバージョンアップ…

  5. VBScript

    文字コードを指定してURLエンコードを行う

    本題に入る前にまずは下記エントリーをご覧ください。・64ビット…

コメント

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

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP