Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

35967 / 76732

←次へ　｜　前へ→


	【45953】Re:ファイル名で使用できない文字の排除

ichinose - 07/1/18(木) 20:43 -


	引用なし

	パスワード

こんばんは。
皆さん、こんばんは。

>全部全角にしようとしましたが、[\]のみ半角のままで変換されません…
>どうしたら[\]→[￥]になるのでしょうか？

へえ、そうなんですか！！これは、知りませんでした。
Strconvを半角・全角変換を目的で使ったことがあまりないので勉強になりました。

これは、メモメモ・・・。

>private Sub Test()
>　　Dim strZenkaku　As String
>　　Dim strHankaku　As String
>　　
>　　strHankaku = "ああああ"
>　　strHankaku = strHankaku & "/:,;\*?<>|[]" & Chr(34) & "いいい"
>　　strZenkaku = StrConv(strHankaku, vbWide)
>　　MsgBox "需要家名 = " & strZenkaku
>End Sub

私は、ワークシート関数派？です。

Sub Test()
　　Dim strZenkaku As String
　　Dim strHankaku As String
　
　　strHankaku = "ああああ"
　　strHankaku = strHankaku & "/:,;\*?<>|[]" & Chr(34) & "いいい"
　　strZenkaku = WorksheetFunction.Dbcs(strHankaku)
　　MsgBox "需要家名 = " & strZenkaku
End Sub

これだと\----￥になりました。

0 hits

▼

【45906】ファイル名で使用できない文字の排除 ボビー 07/1/17(水) 18:48