Makro ile sütundaki en son dolu hücreye kadar kopyalama

[Emir Hüseyin Çoban]

. . .

msgbox son -1 & "sicil kopyalandı.."

. . .

 

[ASLAN7410]

Hüseyin Bey aşağıdaki kodda sicil kopyalandı mesajı çalışmıyor. Bu koda bakabilir misiniz?

Sub BKOPYALA()
Dim son As Integer
son = Range("A65536").End(3).Row
Range("A2:A" & son).Copy
msgbox sonsat -1 & "sicil kopyalandı.."
End Sub

 

[ASLAN7410]

Hüseyin Bey işlem tamam çok teşekkür ediyorum, Allah razı olsun.

Hayırlı çalışmalar.

 

[mlkmlkmlk]

merhaba vba programla da sınav sorusu arıyorum yardımcı olabilirmisiniz?

 

[kalite14]

merhaba
bir formülle ilgili yardıma ihtiyacım oldu ama hazırlamış olduğum tabloyu örnek olarak ekleyemedim neyse benim sorunum mola zamanlarını çalışma saatlerinden düşecek bir formül
personelin üretimlerini kontrol etmek amacı ile hazırlanan tabloda çalışma saatlerinin toplamından mola saatlerini otomatik olarak düşürmek istiyorum. bu çok zaman kaybına ve kafa karışıklığına yol açıyor
ör/ çalışma saatleri 08.00-18.00 arası şu an mola saatleride 09.50-10.00 / 12.00-12.30 / 14.20-14.30 / 16.20-16.30 arası. yani 09.00 da işe başlayan bir personel 15.00 da işi bitirdiğinde arada toplam 50 dakikalık bir mola zamanı kullanmış oluyor. toplam çalışma süresi 6 saat ama 50 dakikalık molayı bu süreden düşerek net çalışma süresini bulmam lazım saatlik net üretime ulaşabilmem için bu konuda yardımlarınızı acilen bekliyorum. şimdiden teşekkür ederim.

 

[kalite14]

merhaba
aşagıda verilen linkte acil yardıma ihtiyacım vardır.
http://s4.dosya.tc/server/aoCqLw/YARDIM.xlsx.html

 

[fenci2737]

Sub BKOPYALA()
Dim son As Integer
    son = Range("B65536").End(3).Row
    Range("B1:B" & son).Copy
End Sub

Sayfaya bir düğme ekleyip, yukarıdaki kodu sayfanın kod bölümüne yapıştırın,
sonra bu kodu düğmeyle ilişkilendirin, düğmeye tıkladıktan sonra yapıştıracağınız yere gelip CTRL+V tuşlarına basın.

Ömer Bey benim şöyle bir problemim var Aslan beyin sorusu gibi benim o satırlarda formül olduğu için hücrelerin hepsi dolu gibi yapıp hepsini kopyalıyor. halbuki değer girilmeyen satırda formül var ben onları almasını istemiyorum. bunu nasıl yapabilirim.