VBScript

clipコマンドを利用してクリップボードに文字列をコピーするVBScript

clipコマンドを利用して文字列をクリップボードにコピーするVBScriptです。

Option Explicit

Dim s

s = "こんにちは" & vbTab & """田中""" & vbTab & "さん"
PutInClipboardText s
MsgBox "文字列をクリップボードにコピーしました。" & vbCrLf & "文字列:" & s

Public Sub PutInClipboardText(ByVal str)
  Dim cmd
  
  cmd = "cmd /c ""echo " & str & "| clip"""
  CreateObject("WScript.Shell").Run cmd, 0
End Sub

XPは標準でclipコマンドが入っていなかったような記憶がありますが、7では標準でclipコマンドが使えるようだったのでスクリプトを書いてみました。
以前に書いたInternet Explorerを使ったスクリプトよりも軽くて使いやすいです。

関連記事

  1. Office関連

    KB2553154の更新プログラムをアンインストールするVBScript

    2014/12/11 追記:当記事で紹介しているのは更新プログラム…

  2. Windows 10

    Microsoft Edgeを起動するVBScript

    前回の記事の関連ですが、下記コードのようにShellExecuteメソ…

  3. Office関連

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

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

  4. Office関連

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

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

  5. VBScript

    WordPressのバックアップを取ってローカル環境で動かす方法(3)

    「WordPressのバックアップを取ってローカル環境で動かす方法(1…

  6. Windows 10

    Microsoft Update カタログから累積更新プログラムをダウンロードするVBScript

    「累積更新プログラム」とは、その名の通りOSを最新の状態に保つための更…

コメント

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

Time limit is exhausted. Please reload CAPTCHA.

最近の記事

アーカイブ

RapidSSL_SEAL-90x50
PAGE TOP