Excel2010を利用しています。
正規表現の置換でスペースをタブに変更したいです。
下記で試しましたが、タブへは置換できず「\t」という文字がそのまま表示されてしまいます。
どのようにすれば解決しますでしょうか?
Dim reg
Dim pat As String
Set reg = CreateObject("VBScript.RegExp")
With reg
.pattern = "(\d+?)[ | ]"
.ignoreCase = True
.Global = True
End With
fnsave = "テキスト.txt"
numff = FreeFile
Open fnsave For Output As #numff
Dim i As Integer
For i = 2 To 10
temp = Cells(i, "BW")
temp = reg.Replace(temp, "$1\t")
Print #numff, temp
Next
Close #numff
No.1ベストアンサー
- 回答日時:
下記コードで試してみると、うまくいっている様です。
ご参考まで。temp = reg.Replace(temp, "$1" & vbTab) とか、
temp = reg.Replace(temp, "$1" & chr(9)) でも。
Debug.Printとしても成否が分からないので、クリップボードにコピーして確認してみました。
'Microsoft Forms 2.0 Object Libraryを参照設定
Sub test()
Dim reg
Dim pat As String
Dim temp As String
Dim CB As New DataObject
Set reg = CreateObject("VBScript.RegExp")
With reg
.Pattern = "(\d+?)[ | ]"
.ignoreCase = True
.Global = True
End With
temp = "123 45 67 9"
temp = reg.Replace(temp, "$1" & vbTab)
With CB
.SetText temp
.PutInClipboard
End With
'TABが視認できるテキストエディターに貼り付けてみる
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 6 2022/06/08 12:55
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2022/04/01 12:11
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) 正規表現を用いての並び替え 7 2022/04/04 09:27
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:12
- Visual Basic(VBA) Excel VBA メール作成について 本文の中にExcel でコピーした図を上下に2つ 貼り付けを 2 2023/06/14 01:48
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Visual Basic(VBA) 実行時エラー´5854´ 文字列型パラメーターが長すぎます。 3 2023/06/08 21:17
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたい 6 2023/01/23 12:00
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
文字列からタブコードを取り除きたい
Visual Basic(VBA)
-
VBAで改行の入ったデータの正規表現について
Excel(エクセル)
-
カンマ( , )をタブに置換したい。
PowerPoint(パワーポイント)
-
-
4
改行を含んだ文字列を正規表現で置換するには?
Visual Basic(VBA)
-
5
EXCEL/VBA 変数の値をクリップボードにコピーする方法
Visual Basic(VBA)
-
6
正規表現で全角数字を半角数字に置換する方法は?
その他(プログラミング・Web制作)
-
7
エクセルVBAでセル範囲のデータをクリップボードに
その他(Microsoft Office)
-
8
VBAでの Replace関数で、ワイルドカードは使えないのでしょうか?
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
カンマを改行に変換する方法
-
文字の列を揃えるには
-
カンマ( , )をタブに置換したい。
-
秀丸で余分なスペースを削除したい
-
Excelで全角ハイフンを半角ハイ...
-
複数のスペースを1つのタブに...
-
エクセルでコンマとピリオドを...
-
Word:差し込み印刷時に文字列...
-
文字列に含まれているダブルク...
-
ワードで複数の文字を一括・連...
-
Excelで特定の文字以下を削除し...
-
エクセルの「置換」で1行の部分...
-
桐の項目名の変数利用(一括処理)
-
セルの文字列後ろのスペース削除
-
Wordでスペースを含む文字を置...
-
Excel : テキストボックス中の...
-
【MS Office Word 2007】文章の...
-
EXCEL VBA でのワード置換
-
ExcelのVBA 正規表現でタブを...
-
エクセルの『検索と置換ボック...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
カンマを改行に変換する方法
-
カンマ( , )をタブに置換したい。
-
秀丸で余分なスペースを削除したい
-
文字列に含まれているダブルク...
-
文字の列を揃えるには
-
Excelで全角ハイフンを半角ハイ...
-
Word:差し込み印刷時に文字列...
-
エクセル重複削除で綺麗に削除...
-
エクセルで濁点カナの変換方法...
-
セルの文字列後ろのスペース削除
-
CSVファイルの任意の列をダブル...
-
エクセルの『検索と置換ボック...
-
word 改行マークを印刷時に表示...
-
Word VBA フッターでの文字の置換
-
エクセル 置換又は関数でかっこ...
-
Excelで特定の文字以下を削除し...
-
ワードで複数の文字を一括・連...
-
Excel : テキストボックス中の...
-
1文字だけ置換したい
-
【MS Office Word 2007】文章の...
おすすめ情報