makro kod içeriğinde ile göre belirli bir veriyi getirmek

Excel formülleri ile ilgili paylaşım alanı
Cevapla
u.L.a.s
Mesajlar: 1
Kayıt: Pzt Oca 29, 2024 10:28 pm
Lokasyon: İstanbul
Meslek: Bilgi İşlem Destek Uzmanı
Adınız: Ulaş
Soyadınız: Arslan

makro kod içeriğinde ile göre belirli bir veriyi getirmek

Mesaj gönderen u.L.a.s »

merhabalar

ekli dosyada aşağıda kodum mevcut.

kısaca anlatmam gerekirse Tesis adlı sheet içerisinde F sütununda tıkladığım bir hücre olunca o hücrenin bulunduğu satırda bulunan bazı verileri Elektrik adlı sheet altına gönderiyorum.

şimdi burada şunu yapmak istiyorum. Elektrik sheetinde veri gelince D sütununda yazan il verisine göre H sütununa Firma ismi yazdıracağım

Örneğin D sütununda İstanbul- 34 Avr, Edirne, Tekirdağ, Kırklareli verisi aktarılmışsa H sütununda karşılığına XYZ Elektrik yazsın
D sütununda Bursa- 16, Yalova- 77 yazıyorsa, H sütununda karşılığındaki hücreye TTT Elektrik Yazsın
gibi bu şekilde ben diğer illeri aynı mantıkla yerleştiririm.

Ama burada aşağıda yazdığım kod içerisinde bu istediğim ile göre elektrik firma getirme işini yapacak kodu yazabilir miyiz

Kod: Tümünü seç

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Target.Column = 6 Then
Application.ScreenUpdating = False
'UserForm2.Show 0
'Application .Wait(Now + TimeValue("0:00:01"))
Son = Sayfa2.Range("A1000").End(3).Row + 1
Range("A" & Target.Row).Copy
Sayfa2.Range("A" & Son).PasteSpecial

Range("B" & Target.Row).Copy
Sayfa2.Range("B" & Son).PasteSpecial

Range("C" & Target.Row).Copy
Sayfa2.Range("C" & Son).PasteSpecial

Range("D" & Target.Row).Copy
Sayfa2.Range("D" & Son).PasteSpecial

Range("E" & Target.Row).Copy
Sayfa2.Range("E" & Son).PasteSpecial

Range("G" & Target.Row).Copy
Sayfa2.Range("F" & Son).PasteSpecial

Sayfa2.Range("G" & Son) = Date

Sayfa2.Range("I" & Son) = "Firmaya İletildi"

Sheets("Tesis").Select
'Application.ScreenUpdating = True
'Unloıfad UserForm2
End If
End Sub
Bu mesaja eklenen dosyaları görüntülemek için gerekli izinlere sahip değilsiniz.
sahin
Mesajlar: 38
Kayıt: Pzr Oca 21, 2024 1:44 pm
Adınız: sahin
Soyadınız: sahin

Re: makro kod içeriğinde ile göre belirli bir veriyi getirmek

Mesaj gönderen sahin »

Örneğin D sütununda İstanbul- 34 Avr, Edirne, Tekirdağ, Kırklareli verisi aktarılmışsa H sütununda karşılığına XYZ Elektrik yazsın
D sütununda Bursa- 16, Yalova- 77 yazıyorsa, H sütununda karşılığındaki hücreye TTT Elektrik Yazsın
gibi bu şekilde ben diğer illeri aynı mantıkla yerleştiririm.
bu firma isimleri nerede yazıyor yada yazacak
SNNAY
Mesajlar: 10
Kayıt: Prş Mar 21, 2024 11:31 am
Lokasyon: istanbul
Meslek: Oto Yedek Parça Satış Elemanı
Adınız: Sinan
Soyadınız: Aykaç

Re: makro kod içeriğinde ile göre belirli bir veriyi getirmek

Mesaj gönderen SNNAY »

Umarım işinize yarar.
Bu mesaja eklenen dosyaları görüntülemek için gerekli izinlere sahip değilsiniz.
Cevapla
  • Benzer Konular
    Cevaplar
    Görüntüleme
    Son mesaj