Soru sayfa aktarımı

[hüseyin551]

Merhaba
Dökümanda bulunan isimlerin her birine ayrı ayrı bir excel sayfası açılabilir mi ? (otamatik olarak)
Dökümanda bulunan o isim ile ilgili veriler o sayfaya (hücreleri belirterek) aktarılabilir mi ?
bunun için nereden başlamam gerekiyor
ilginiz için şimdiden teşekkür ederim.

 

[Korhan Ayhan]

Forumda arama yapmalısınız...

Arşiv konularını inceleyiniz.

Sorgu için arama sonuçları: sayfalara+aktar

www.excel.web.tr

 

[hüseyin551]

Forumda arama yapmalısınız...

Arşiv konularını inceleyiniz.

Sorgu için arama sonuçları: sayfalara+aktar

www.excel.web.tr

Üstad devamlı araştırıyorum. ilginiz için teşekkür ederim inceleyeceğim sagolun

 

[Mdemir63]

Selamlar

@veyselemre Hocamın kodlarını sizin dosyanıza uyarlamaya çalıştım. İnceleyiniz.
Ayrıca Dosyanızdaki Başlıklarda düzenleme yaptım. Yani Birleştirilmiş hücreleri kaldırdım.
Size de tavsiyem birleştirilmiş hücre kullanmaktan mümkün olduğunca kaçınmanız.

 

[hüseyin551]

Selamlar

Dosyanıza @veyselemre Hocamın kodlarını sizin dosyanıza uyarlamaya çalıştım. İnceleyiniz.
Ayrıca Dosyanızdaki Başlıklarda düzenleme yaptım. Yani Birleştirilmiş hücreleri kaldırdım.
Size de tavsiyem birleştirilmiş hücre kullanmaktan mümkün olduğunca kaçınmanız.

hocam çok teşekkür ederim benim yolumu bayağı açtınız.

 

[Mdemir63]

Rica Ederim.
İyi Çalışmalar

 

[hüseyin551]

Rica Ederim.
İyi Çalışmalar

hocam bir isteğim daha olaçak ama
listbox1 de isimler var ismin üzerini tıkladığımda excel sayfasına git butonuna bastığımda o sayfanın acılmasını istiyorum.
teşekkür ederim

 

[Mdemir63]

Selamlar

Form üzerindeki EXCEL SAYFA GİT butonunun kod penceresine aşağıdaki kodu yazıp deneyiniz

    Dim git As String
    Dim ws As Worksheet
       git = ComboBox1.Value
       Set ws = Worksheets(git)
       If Not ws Is Nothing Then
        ws.Select
    Else
        MsgBox "İlgili isme sahip bir sayfa bulunamadı!"
    End If

 

[hüseyin551]

Selamlar

Form üzerindeki EXCEL SAYFA GİT butonunun kod penceresine aşağıdaki kodu yazıp deneyiniz

    Dim git As String
    Dim ws As Worksheet
       git = ComboBox1.Value
       Set ws = Worksheets(git)
       If Not ws Is Nothing Then
        ws.Select
    Else
        MsgBox "İlgili isme sahip bir sayfa bulunamadı!"
    End If

combobox değistirdim listbox la düzelttim oldu. teşekkür ederim

 

[hüseyin551]

Selamlar

Form üzerindeki EXCEL SAYFA GİT butonunun kod penceresine aşağıdaki kodu yazıp deneyiniz

    Dim git As String
    Dim ws As Worksheet
       git = ComboBox1.Value
       Set ws = Worksheets(git)
       If Not ws Is Nothing Then
        ws.Select
    Else
        MsgBox "İlgili isme sahip bir sayfa bulunamadı!"
    End If

hocam sizden bir ricam var
dökümanlarda sayfaya olustur bilğileri aktar butonu var onu ben userform1 de güncelleme butonu yaptım orayı tıkladığimde aynı işlemi nasıl yapabilirmiyiz?

isimlerin sayfa formatını sayfa1 deki gibi yapılabilir mi?
sayfa1 de tarih otomatık atıyor bakiye b9 ,fındık satış f9, fiyatı g9 ,gelen fındık kilo k9 ,fatura tarih p13 , no Q13 . kilo r 13, fiyatı s13 aktarım olur mu?

inşaallah anlatabilmişimdir
şimdiden teşekkür ederim.

 

[hüseyin551]

Hocam müsait olduğunuzda bakabilir misiniz?