Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


12336 / 76734 ←次へ | 前へ→

【69924】Charactersの処理で変数を使いたい
質問  yoko  - 11/9/24(土) 11:48 -

引用なし
パスワード
    1例ですが
 ("A1")にある値が "サービスコード" + Alt + Enterで処理されていて
 "サービスコード" の後ろに空白があります
 この空白を削除したいので以下のように書きました
 御願いいたします

 Dim Gname As String
 Range("A1").Select
  Gname = Range("A1")   ’Gname =サービスコードの文字
 ’以下のように変数で書きましたが処理できません 
  ActiveCell.FormulaR1C1 = Gname
 ’以下のように書くとうまくいきました
  変数を使うと駄目なのでしょうか
  ActiveCell.FormulaR1C1 = "サービスコード"
  With ActiveCell.Characters.Font
    .Name = "MS Pゴシック"
    .FontStyle = "標準"
    .Size = 6
    .Strikethrough = False
    .Superscript = False
    .Subscript = False
    .OutlineFont = False
    .Shadow = False
    .Underline = xlUnderlineStyleNone
    .ColorIndex = 1
  End With
  Range("B1").Select

4 hits

【69924】Charactersの処理で変数を使いたい yoko 11/9/24(土) 11:48 質問
【69926】Re:Charactersの処理で変数を使いたい n 11/9/24(土) 12:43 発言
【69927】Re:Charactersの処理で変数を使いたい yoko 11/9/24(土) 12:56 お礼

12336 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free