- VBAなんでも質問スレ Part2 [転載禁止]©2ch.net
7 :デフォルトの名無しさん[sage]:2015/06/10(水) 12:51:41.97 ID:Eg5H5jgh - outlook2010でHTML形式メール本文の
Enter改行をShiftEnter改行に一括置換、 のVBAをさがしています。 下記のVBAでWordは動くのだけど、 そのままではoutlookで動かない Sub ShiftEnterConvert() ' ' Enter改行をShiftEnter改行に変換 ' ' Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "^13" .Replacement.Text = "^11" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.Find.Execute Replace:=ReplaceAll End Sub
|