kodla diğer sayfaya veri aktarma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Epakambalaj

Kullanıcı
Katılım
28 Tem 2022
Mesajlar
370
Excel Versiyonu
Excel 2010
Excel Sürümü
64 Bit
Excel Dili
Türkçe

Ekli dosyalar

Çözüm
AhmetRasim
Mevcut Mal isimli sayfanın VBA bölümündeki ismi Sayfa2 dir.
Kod içinde Set s2 = Sayfa2 tanımlaması ile s2 değişkenine Sayfa2 atanmış olur.
1670332790089.webp


Hangi sayfayı atama yapacaksanız önce buradaki Sayfa2 ismini değiştirmeniz gerekir.

Daha sonra;
-- Arama yapılacak alan E sütunu değilse
Set bul = s2.Range("E:E").Find(urun)
satırındaki E harfini değiştirmeniz gerekir.

-- Veri yazdıracağınız sütun F sütunu değilse
s2.Range("F" & bul.Row).Value = Target.Value
satırındaki F harfini değiştirmeniz gerekir.
Tarihe göre sırala Oylamaya göre sırala
Hocam bu kodu farklı isimli bir sayfaya yazdırmak için ne yapmamız gerekir?
Ör. 10 sayfalık bir dosyada, "mevcut mal" yerine "liste" isimli farklı bir sayfaya veri çekmemiz için kodun neresini değiştirmeliyiz?
 
Oyla 0 Olumsuz oyla
Mevcut Mal isimli sayfanın VBA bölümündeki ismi Sayfa2 dir.
Kod içinde Set s2 = Sayfa2 tanımlaması ile s2 değişkenine Sayfa2 atanmış olur.
1670332790089.webp


Hangi sayfayı atama yapacaksanız önce buradaki Sayfa2 ismini değiştirmeniz gerekir.

Daha sonra;
-- Arama yapılacak alan E sütunu değilse
Set bul = s2.Range("E:E").Find(urun)
satırındaki E harfini değiştirmeniz gerekir.

-- Veri yazdıracağınız sütun F sütunu değilse
s2.Range("F" & bul.Row).Value = Target.Value
satırındaki F harfini değiştirmeniz gerekir.
 
Oyla 0 Olumsuz oyla
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt