Skip to main content

AccessTr.neT


Kapalı Excel Son Satır No Bulma

Kapalı Excel Son Satır No Bulma

#19
Alttaki kod ilede Access kodlarına uyarladım.Yani Access butonuna tıklayınca kapalı exceldeki veriler bulunuyor.

Kod:
Option Compare Database

Private Sub Komut0_Click()
   
      Dim TamAd As String

      Set excel = CreateObject("Excel.Application")
     
     TamAd = "'" & CurrentProject.Path & "\[kapali.xlsx]Sayfa1'!"

     MsgBox Mid(TamAd, 2, Len(TamAd) - 3) & vbNewLine & "-----------------" & vbNewLine & "A Sütunu Son Satir Numarasi: " & excel.Application.ExecuteExcel4Macro("LOOKUP(2,1/(" & TamAd & "C1<>""""),ROW(" & TamAd & "C1))") & _
      vbNewLine & "A Sütunu Son Deger: " & excel.Application.ExecuteExcel4Macro("LOOKUP(2,1/(" & TamAd & "C1<>"""")," & TamAd & "C1)")

    Set excel = Nothing
   
End Sub

.rar Kapali dosyadan al ExecuteExcel4Macro Son satir Access Excel.rar (Dosya Boyutu: 29,04 KB | İndirme Sayısı: 1)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Kapalı Excel Son Satır No Bulma - Yazar: feraz - 03/03/2020, 20:41
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 07/03/2020, 13:15
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 07/03/2020, 13:17
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 07/03/2020, 13:20
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 07/03/2020, 14:42
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 07/03/2020, 17:23
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 07/03/2020, 17:38
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 09/03/2020, 12:07
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 09/03/2020, 12:43
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 09/03/2020, 12:52
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 09/03/2020, 12:58
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 09/03/2020, 13:01
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 09/03/2020, 13:13
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 09/03/2020, 14:19
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 10/03/2020, 00:30
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 10/03/2020, 19:42
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 10/03/2020, 20:30
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: berduş - 10/03/2020, 20:43
Cvp: Kapalı Excel Son Satır No Bulma - Yazar: feraz - 10/03/2020, 22:04
Task