Sub macro() Dim i As Long For i = 2 To Range("A" & Rows.Count).End(xlUp).Row If Dir("○○" & Range("A" & i).Value & ".pdf") <> "" Then With ActiveSheet.Hyperlinks .Add anchor:=Range("A" & i), _ Address:="○○" & Range("A" & i).Value & ".pdf" E…

VBAでアスタリスクの文字列を探したい時に、 "*"と書いてしまうと、ワイルドカード扱いとなり、うまく認識させれません。 そこで、「*」を文字列として識別させる方法をご紹介します。 *や?など、ワイルドカードで使用される記号を文字列として識別される方…