Excel VBA 質問スレ Part69

[411 デフォルトの名無しさん (JP 0Hc9-6WVI) 2021/01/30(土) 01:07:22.27 ID:6QDP6TPLH]

>>408
Else
　　Ws.Cells(gyo, "A").NumberFormatLocal = "@"
　　Ws.Cells(gyo, "A") = Right(w.Cells(1, "B"), 7)
End If