auto move beda sheet

  1. 4 minggu lalu

    Selamat siang para suhu.
    Mohon bantuan nya buat auto copy atau cut data ke beda sheet. Terima kasih sebelumnya :)

    Kalau auto cut berarti harus pakai Macro/VBA, prinsipnya mencari posisi baris yang berisi teks Data Sampling, kemudian di CUT dan di pindah ke Sheet baru.

    Mungkin kurang lebihnya seperti ini, letakkan script ini di Sheet1 Code kemudian di run:

    Sub PindahSampling()
    Dim LR As Integer, rCari As Integer
    LR = Cells(Rows.Count, "G").End(xlUp).Row
    rCari = Cells.Find(What:="Data Sampling").Row
    Range("A" & rCari & ":I" & LR).Cut
    Sheets.Add After:=ActiveSheet
    ActiveSheet.Paste
    End Sub

  2. Masdad

    Mar 8 Terverifikasi Jawaban Terpilih Demak + 1.467 Poin
    Di sunting 4 minggu lalu oleh Masdad

    Kalau auto cut berarti harus pakai Macro/VBA, prinsipnya mencari posisi baris yang berisi teks Data Sampling, kemudian di CUT dan di pindah ke Sheet baru.

    Mungkin kurang lebihnya seperti ini, letakkan script ini di Sheet1 Code kemudian di run:

    Sub PindahSampling()
    Dim LR As Integer, rCari As Integer
    LR = Cells(Rows.Count, "G").End(xlUp).Row
    rCari = Cells.Find(What:="Data Sampling").Row
    Range("A" & rCari & ":I" & LR).Cut
    Sheets.Add After:=ActiveSheet
    ActiveSheet.Paste
    End Sub

  3. Wow udah berhasil @masdad terimakasih banyaaakkk :) tapi mau nanya lagi dong master kalo buat vlookup tapi beda baris gimana ya?

  4. Masdad

    Mar 9 Terverifikasi Demak + 1.467 Poin

    Belum bisa jawab, masih belum faham. yang dimaksud vlookup beda baris yang seperti apa.

 

atau Mendaftar untuk ikut berdiskusi!