Excel VBA質問箱 IV

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

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


25848 / 76732 ←次へ | 前へ→

【56221】MID関数での質問
質問  初心者  - 08/6/9(月) 11:42 -

引用なし
パスワード
    MID関数で教えて下さい。
 台帳シートの内容を
 空白行を作成して、その箇所に
 MID関数で項目を編集して
 貼り付けています。
 
 明細は2行目からあるのですが
 貼り付けると、3行目の内容が
 2行目へ、4行目の内容が
 3行目へと張り付くのですが
 下の書き方で何かおかしいのか
 教えて下さい。
 
 お願いします。


  i = 2
  
  Do While Cells(i, 2) <> ""
  
  Sheets("台帳").Select
  Cells(i, 1).Select
  
  ActiveCell.FormulaR1C1 = "=MID(R[1]C[10],1,3)"
  ActiveCell.FormulaR1C1 = "=MID(R[1]C[10],1,3)&MID(R[1]C[10],5,14)"
  
  Sheets("台帳").Select
  Cells(i, 1).Select
  
  i = i + 1
  
  
  Loop
  
  Columns("A:A").EntireColumn.AutoFit

1 hits

【56221】MID関数での質問 初心者 08/6/9(月) 11:42 質問
【56223】Re:MID関数での質問 Jaka 08/6/9(月) 12:49 発言
【56225】Re:MID関数での質問 初心者 08/6/9(月) 14:06 質問
【56226】Re:MID関数での質問 Jaka 08/6/9(月) 14:51 発言
【56238】Re:MID関数での質問 初心者 08/6/10(火) 18:30 お礼

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