Cześć,
szukam po internecie, próbowałem z chatemgpt oraz nagrywaniem makr, ale nic nie działa, a zadanie wydaje się być proste. Chciałbym za pomocą VBA importować tabelkę z pdfa. Ma to działać tak samo jak import przez Dane->Pobierz dane->Z pliku->PDF. Czy ktoś wie jak to zrobić?
Poniżej wstawiam mój kod, który znajduje ostatni plik z folderu "downloads". Potrzebuję do niego dorobić ten import, a później już sobie pewnie poradzę
Sub PDF()
Application.ScreenUpdating = False
Dim Nazwa_obecnego_pliku As String
Nazwa_obecnego_pliku = ThisWorkbook.Name
Dim System As FileSystemObject
Dim Plik As File
Dim Folder
Dim Nazwa_Pliku As String
Dim Data_Pliku As Date
Dim Wybrany_plik As String
Dim Sciezka As String
Sciezka = "C:\Users" & Environ("UserName") & "\Downloads"
Set System = New FileSystemObject
Set Folder = System.GetFolder(Sciezka)
Data_Pliku = DateSerial(1900, 1, 1)
For Each Plik In Folder.Files
If Plik.DateLastModified > Data_Pliku Then
Data_Pliku = Plik.DateLastModified
Nazwa_Pliku = Plik.Name
End If
Next Plik
Wybrany_plik = Sciezka & Nazwa_Pliku