“Excel VBA pindah ke sel yang terlihat berikutnya” Kode Jawaban

Excel VBA pindah ke sel yang terlihat berikutnya

' Select the cell immediately above the filtered view
Range("A1").Select
' Move the selection to the first visible filtered cell of the same column
ActiveCell.Offset(1, 0).Select
  Do Until ActiveCell.EntireRow.Hidden = False
  ActiveCell.Offset(1, 0).Select
  Loop