السَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ
Semangat pagi,.

Mungkin bisa ditambahkan Fungsi Offset pak.


وَالسَّلَامُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Warm Regards,

On 29/04/2014 14:29, Yayan Ajah wrote:
Assalamu'alaikum Wr. Wb

Dear B-Exeler & Master
Nubi mau tanya, gimana caranya agar pindah satu cell ke bawah lagi, berikut hasil record macro saya :

Sub Macro10()
'
' Macro10 Macro
'

'
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
  False, Transpose:=True
Range("B7:B13").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlUp
Selection.Copy
Range("C2").Select
Selection.End(xlDown).Select
End Sub

Wassalamu'alaikum Wr. Wb
Yayan


Kirim email ke