0852たすけて。。垢版 | 大砲2019/07/14(日) 22:44:19.05 失礼しました。 間違えてました、以下のとおりだとエラーはでません。 × yyyy = Str("Worksheet("学期別カリキュラム").Cells(9,1).Value) ○ yyyy = Str("Worksheets("学期別カリキュラム").Cells(9,1).Value) ただ、エラーも出ませんが、出力もでません。。。