0973デフォルトの名無しさん垢版 | 大砲2018/04/26(木) 20:04:54.98ID:PM4/5yqo >>965 あと Dim cnt As String にして文字列で代入すれば()の中にダブルクォートがいらないから見やすくなるよ cnt = "1" Sheets(cnt).Select