Excel VBA質問箱 IV

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

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


20785 / 76732 ←次へ | 前へ→

【61359】セル内から特定の文字を削除する(replace)
質問  Hoppy  - 09/5/4(月) 7:59 -

引用なし
パスワード
   A列にはお店の名前、B列には県名(新潟県、滋賀県、福井県、神奈川県のいずれか)が入ったリストがあります。これを元に色々と加工する中で”県”が非常に邪魔になって、なんとか”県”だけを消したいのですが、初心者ゆえ思うように行きません。
色々トライするも、コンパイルの時点ですでにエラーです。
初歩的なことですが教えていただけませんでしょうか。

タイトル行を検索し、そこから下に処理をしています(つもりです、、)。

Sub Del_KEN()
  Dim intYLine As Integer
  Dim intXLine As Integer

  intYLine = Worksheets("data").Cells.Find("県名").Row
  intXLine = Worksheets("data").Cells.Find("県名").Column
  
  Do While intYLine < 1500
    intYLine = lngYLine + 1
    Replace(Cells(intYLine,intXLine),"県","")
  Loop
End Sub

0 hits

【61359】セル内から特定の文字を削除する(replace) Hoppy 09/5/4(月) 7:59 質問
【61360】Re:セル内から特定の文字を削除する(repl... Hirofumi 09/5/4(月) 9:23 回答
【61363】Re:セル内から特定の文字を削除する(repl... Hoppy 09/5/4(月) 13:58 お礼
【61361】Re:セル内から特定の文字を削除する(repl... かみちゃん 09/5/4(月) 9:38 発言
【61364】Re:セル内から特定の文字を削除する(repl... Hoppy 09/5/4(月) 14:13 お礼
【61378】Re:セル内から特定の文字を削除する(repl... Hoppy 09/5/5(火) 7:41 お礼
【61362】Re:セル内から特定の文字を削除する(repl... ゆみこん 09/5/4(月) 12:22 発言
【61365】Re:セル内から特定の文字を削除する(repl... Hoppy 09/5/4(月) 14:18 お礼
【61379】Re:セル内から特定の文字を削除する(repl... りん 09/5/5(火) 8:47 発言
【61397】Re:セル内から特定の文字を削除する(repl... Hoppy 09/5/5(火) 22:56 お礼

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