- Katılım
- 14 Şubat 2007
- Mesajlar
- 55
- Excel Vers. ve Dili
- Excel 2002
Private Sub ListView1_DblClick()
On Error Resume Next
faturafrm.txtfirma = Me.ListView1.SelectedItem.ListSubItems(1).Text
Unload cariarafrm
End Sub
Arkadaşlar ekteki dosyada firma arayıp seçmek için cariarafrm adlı userfrom var. FİRMA BUL comandbuttonuan basılınca açılan cariarafrm den firmayı seçeceğim hangi userformdan açılmışsa o userforma eçtiğim firmayı kaydetmesini istiyorum .Üstteki kodda sadece faturafrmye kaydediyor.yardım edermisiniz.
On Error Resume Next
faturafrm.txtfirma = Me.ListView1.SelectedItem.ListSubItems(1).Text
Unload cariarafrm
End Sub
Arkadaşlar ekteki dosyada firma arayıp seçmek için cariarafrm adlı userfrom var. FİRMA BUL comandbuttonuan basılınca açılan cariarafrm den firmayı seçeceğim hangi userformdan açılmışsa o userforma eçtiğim firmayı kaydetmesini istiyorum .Üstteki kodda sadece faturafrmye kaydediyor.yardım edermisiniz.
