2ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

Excel総合相談所 97

545 :名無しさん@そうだ選挙にいこう:2011/07/01(金) 20:49:00.33
どういじったのかしらんけど
ざっと見た限りでは
 lastRow = Worksheets("Sheet1").Range("B" & Rows.Count).End(xlUp).Row
 lastCol = Worksheets("Sheet1").Cells(1, Columns.Count).End(xlToLeft).Column
 myVal = Worksheets("Sheet1").Range(Cells(2, 1), Cells(lastRow, lastCol)).Value
この3行をセットで考えないといけないと思うよ

345 KB
★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.01.03 2014/02/20 Code Monkey ★
FOX ★ DSO(Dynamic Shared Object)