• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

combobox dan seçili olan sayfaya veri ekleme sorunu

  1. Discreum

    Çözüldü combobox dan seçili olan sayfaya veri ekleme sorunu

    Private Sub CommandButton2_Click() On Error Resume Next Dim sh As Worksheet If ComboBox1.Value(i) Then Set sh = ThisWorkbook.Sheets(ComboBox1.Value(i)) Dim Last_Row As Long Last_Row = Application.WorksheetFunction.CountA(sh.Range("I:I")) sh.Range("I" & Last_Row + 1).Value = "=IF(J" & Last_Row...
Geri
Üst