人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

WordのVBAを使ってみたい

集計業務で使用するため(数値ではなく文字)WordのVBAを使用したいと思っています。
ExcelのVBAでは解説サイトやサンプル集が多数発見できるので、わからなかったら検索しながら構築していくことが可能です。
まだやろうと思ったタイミングなんでなんとも言えませんが、WordのVBAの解説サイトがほとんど見つかりません。
心が折れかかっているのでご教示していただきたいのですが…

1.Word文書の最初の1文字目にカーソルを移動させる
2.任意の位置にカーソルを移動させる
3.文字カウントの結果を数式の中で使う

この3つを行いたいと思っています。
実現可能でしょうか?
実現可能な場合、コードをご教示下さい。

●質問者: keijun5145
●カテゴリ:コンピュータ
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● 味わい

Sub Macro1()

Dim buf As String
Dim res As String

buf = InputBox("カウントしたい単語を入力してください")
res = CountWord(buf)
MsgBox (res)
End Sub

Function CountWord(WordWantToCount As String) As Long

Dim cnt As Long
With ActiveDocument.Range(0, 0).Find
.Text = WordWantToCount
Do While .Execute
cnt = cnt + 1
Loop
End With

CountWord = cnt

End Function


とりあえずカウントした数はポップアップに出力しました。

関連質問

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ