|
お世話になります。
例えば"入力"sheetがactiveになったとき、
Private Sub Worksheet_Activate()に次のマクロを入れて"集計表"sheetのA列最大値+1を読み取りたいのですが、たまたま"集計表"sheetがソートされていると
正確に読めません。
Range("c3").Value = Application.WorksheetFunction.Max(Sheets("集計表").Range("a1:a" & a)) + 1
"集計表"sheetから、別のsheetに変わったときに全て表示出来ればと思って
集計表sheetに
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
ActiveSheet.ShowAllData
と入れたのですが、これは"集計表"がactiveになった時に全表示になるだけで
効果がありません。
Private Sub Worksheet_Deactivate()に入れても駄目です。
"入力"sheetをactiveにした時"集計表"sheetを全表示にする方法は無いでしょうか。
|
|