Excel VBA質問箱 IV

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

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


20788 / 76737 ←次へ | 前へ→

【61361】Re:セル内から特定の文字を削除する(replace)
発言  かみちゃん  - 09/5/4(月) 9:38 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>色々トライするも、コンパイルの時点ですでにエラーです。

 Replace(Cells(intYLine,intXLine),"県","")
のコードでエラーになるのですか?
    Cells(intYLine, intXLine).Value = Replace(Cells(intYLine, intXLine).Value, "県", "")
とすればいいのではないでしょうか?

>  intYLine = Worksheets("data").Cells.Find("県名").Row
>  intXLine = Worksheets("data").Cells.Find("県名").Column

の値が正しく取得できているのかは、疑問があります。
シートレイアウトがよくわかりませんので、
「県名」という文字列を含まれているセルを検索しているのですが、それでいいのでしょうか?
県名がB列と決まっているならば、あまり、意味がないように思います。

また、Excelのバージョンにもよりますが、
Dim intYLine As Integer
Dim intXLine As Integer
のデータ型は、特に行番号の場合は、Longにしておいたほうがいいです。
32767行を超えると、オーバーフローのエラーになります。
そんなにたくさんの行は、絶対使わないから、Integerをあえて、使っているのであれば、
お任せしますが・・・

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 お礼

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