Seçili hüçre makro kodu

[DEKORrehberi.com]

Seçili hüçre makro kodu nedir

seçili alanı kopyalayıp yapıştırmak istiyorum, fakat bu seçili alan herzaman değişik yer oluyor. bunun içinde excelde oluşan makroda hücre aralıklarını sabit alıyor, halbuki o anki aktif alanı belirten kod nedir

ör:
_____________________________________________

Sub Yazdir()
'
' Yazdir Makro
'

'
Range("E1304:J1304").Select ' (Burası seçil aktif alan olmalı)
Selection.Copy
'
'
'
Sheets("ADRES").Select
Range("C3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("C6").Select
Application.CutCopyMode = False
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"

End Sub

 

[lark]

Range("E1304:J1304").Select ' (Burası seçil aktif alan olmalı)

Bu satırı silmeniz yeterli.

 

[DEKORrehberi.com]

Range("E1304:J1304").Select '

(seçili bölge herzaman değişebilir, o yüzden seçili bölgeyi kod olarak nasıl ifade edebiliriz)
_______

Siteden şöyle bir kodu aldım fakat kullanamadım

Seçili Alanı Belirtilen Yere Kopyalamak

Sub SelCurRegCopy()
Selection.CurrentRegion.Select
Selection.Copy


Range("A17").Select ' Kopyalamaya başlanacak hücreyi belirt
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub

 

[lark]

Dediğimi denediniz mi.
Kodunuzun içindeki "Selection.Copy" satırı zaten elinizle aktif ettiğiniz alanı panoya kopyalıyor. Siz nereyi seçerseniz, orayı kopyalar. Başka birşeye gerek yok.

 

[DEKORrehberi.com]

Hata alıyorum dosya gönderdim

Hata alıyorum dosya gönderdim

 

[lark]

Dosyanız macro içermiyor. Dosya uzantınız ".xlsm" olmalı.