Excel (VBA)

Excel VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 10 Pro : 指定なし)
セルの1文字目に手入力したシングルコーテーションがあるかどうかの判定
投稿日時: 20/10/28 13:18:46
投稿者: QooApp

お世話になっております。
 
セルの入力文字列の冒頭に半角シングルコーテーションがある場合、
 
原則、どのような方法を使っても文字列の1文字として取得できないと思いますが、
何か取得する方法をご存じの方はいらっしゃいますでしょうか。
 
MsgBox ( LEFT ( Range(座標).value , 1) ) :失敗例
 
や、Replace等の関数では原則取得できないと思いますが…ほかに方法はあたったりするのでしょうか。
 
 
それとも1文字目のシングルコーテーションは取得できないという大前提をもとに
セルの値では何らかの別の代替文字列で補完しておき、VBAで実行中に代替文字列であればシングルコーテーションと判定させるのが妥当でしょうか。
 

'AAAaaa > 代替文字列に変換:★AAAaaa
 
VBA実行中に
1文字目が★ならばシングルコーテーションとして判定
 

回答
投稿日時: 20/10/28 13:48:07
投稿者: mattuwan44

Sub test()
    Dim a As Range
    Set a = Range("A1")
    MsgBox a.PrefixCharacter
End Sub

 
PrefixCharacterプロパティを見ればよいようです。[/code]

投稿日時: 20/10/28 13:57:10
投稿者: QooApp

mattuwan44 さんの引用:
Sub test()
    Dim a As Range
    Set a = Range("A1")
    MsgBox a.PrefixCharacter
End Sub

 
PrefixCharacterプロパティを見ればよいようです。[/code]

 
mattuwan44様
 
おおおおおすごい!!
記号化してしまう文字取得できるんですねこれ
ありがとうございます!