Przyjrzyjmy si\u0119 temu, jak mo\u017cna wykorzysta\u0107 mo\u017cliwo\u015bci ChatGPT<\/mark><\/strong>, w obszarze ksi\u0119gowo\u015bci oraz podatk\u00f3w. Podzielmy cykl pracy z danymi w tych obszarach na cztery sekcje:<\/p> Dzi\u0119ki ChatGPT <\/strong>mo\u017cemy szybciej tworzy\u0107 intuicyjne i czytelne szablony do zbierania wysokiej jako\u015bci danych. Dane mo\u017cemy przyk\u0142adowo pozyskiwa\u0107 poprzez formularze, kwestionariusze, czy czytelne i \u0142atwe do wype\u0142nienia lub zmapowania tabele.<\/p> W tym kroku skrypty wygenerowane przez AI mog\u0105 pom\u00f3c w usuni\u0119ciu duplikat\u00f3w, uzupe\u0142nianiu brakuj\u0105cych informacji, standaryzacji format\u00f3w czy usuwaniu znak\u00f3w specjalnych, nieakceptowanych przez nasze systemy na dalszych etapach.<\/p> Po zebraniu i oczyszczeniu danych skrypty generowane przez AI mog\u0105 pom\u00f3c nam \u0142\u0105czy\u0107 dane, tworzy\u0107 raporty finansowe, czy dostosowa\u0107 pliki do struktury wymaganej przez nasz system finansowo-ksi\u0119gowy.<\/p> Rosn\u0105ce skomplikowanie przepis\u00f3w powoduje, \u017ce coraz wi\u0119cej transakcji wymaga bardziej rozbudowanych analiz. Skrypty generowane przez AI mog\u0105 pom\u00f3c ksi\u0119gowym, poprzez automatyczne sprawdzanie przekroczenia prog\u00f3w, czy spe\u0142nienia okre\u015blonych warunk\u00f3w. Z pomoc\u0105 skrypt\u00f3w mo\u017cemy otrzymywa\u0107 list\u0119 transakcji wymagaj\u0105cych dalszej pog\u0142\u0119bionej analizy.<\/p> <\/p> Poka\u017cmy na prostym przyk\u0142adzie, jak za pomoc\u0105 ChatGPT mo\u017cemy stworzy\u0107 skrypt w j\u0119zyku Visual Basic for Applications (VBA), kt\u00f3ry po\u0142\u0105czy dane z wielu plik\u00f3w. Zadanie jest nast\u0119puj\u0105ce: po\u0142\u0105czmy dane z kilkudziesi\u0119ciu plik\u00f3w i tabel w jeden plik<\/strong><\/mark>.<\/strong> <\/mark>Mamy 24 pliki, 48 tabel, tysi\u0105ce wierszy. Spr\u00f3bujmy wsp\u00f3lnie z ChatGPT stworzy\u0107 skrypt w j\u0119zyku Visual Basic for Applications, kt\u00f3ry po\u0142\u0105czy te dane za pomoc\u0105 jednego klikni\u0119cia.<\/p> Rozpocznijmy od analizy procesu, kt\u00f3ry chcemy zautomatyzowa\u0107 i okre\u015blmy nasze cele. Opiszmy to jak najdok\u0142adniej.<\/p> Aby zwi\u0119kszy\u0107 szans\u0119 na otrzymanie ju\u017c w pierwszej odpowiedzi w 100% dzia\u0142aj\u0105cego skryptu, warto pami\u0119ta\u0107 o kilku istotnych rzeczach. Przede wszystkim precyzyjnie okre\u015blamy za\u0142o\u017cenia, struktur\u0119 danych wej\u015bciowych oraz oczekiwany format wyj\u015bciowy.<\/mark><\/strong><\/p> <\/p> Na podstawie zebranych informacji tworzymy prompt, czyli zapytanie do ChatGPT. Doprecyzujmy w nim, \u017ce podczas \u0142\u0105czenia tabel chcemy, aby nazwy nag\u0142\u00f3wk\u00f3w nie by\u0142y duplikowane oraz by program pyta\u0142 u\u017cytkownika, gdzie chce zapisa\u0107 wygenerowany plik. Zapami\u0119tajmy, \u017ce og\u00f3lne i niejednoznaczne okre\u015blenia mog\u0105 prowadzi\u0107 do generowania mniej precyzyjnych odpowiedzi oraz zmniejsza\u0107 szans\u0119 na otrzymanie satysfakcjonuj\u0105cego rezultatu. Oto tre\u015b\u0107 promptu wraz z odpowiedzi\u0105 modelu:<\/p> <\/p> <\/p> <\/p> <\/p> Przed wprowadzeniem pierwszego kodu do skoroszytu Excela, nale\u017cy najpierw doda\u0107 do wst\u0105\u017cki kart\u0119 Deweloper<\/strong><\/mark>. Aby to zrobi\u0107, nale\u017cy:<\/p> <\/p> <\/p> <\/p> <\/p> Po aktywacji zak\u0142adki dewelopera, aby otworzy\u0107 edytor VBA<\/mark>,<\/mark><\/strong> wystarczy skorzysta\u0107 ze skr\u00f3tu klawiszowego Alt + F11. Kod wprowadzamy w g\u0142\u00f3wnym oknie edytora.<\/p> <\/p> <\/p> <\/p> <\/p> <\/p> <\/p> Po wprowadzeniu kodu mo\u017cemy zamkn\u0105\u0107 edytor VBA. By uruchomi\u0107 makro nale\u017cy:<\/p> <\/p> <\/p> <\/p> <\/p> <\/p> <\/p> Po uruchomieniu makra i wskazaniu lokalizacji do zapisania pliku otrzyma\u0142em nast\u0119puj\u0105cy komunikat:<\/p> <\/p> <\/p> <\/p> <\/p> Sp\u00f3jrzmy jak wygl\u0105da nasz plik wyj\u015bciowy:<\/p> <\/p> <\/p> <\/p> <\/p> Makro zadzia\u0142a\u0142o zgodnie z oczekiwaniami i nie wymaga\u0142o \u017cadnych zmian w kodzie, cho\u0107 nie jest to oczywisto\u015bci\u0105. Czasami wygenerowany przez ChatGPT kod mo\u017ce by\u0107 wadliwy i nie zadzia\u0142a\u0107. W\u00f3wczas nale\u017cy opisa\u0107 b\u0142\u0105d i poprosi\u0107 model o poprawienie b\u0142\u0119du. Zazwyczaj po maksymalnie kilku iteracjach, b\u0142\u0105d zostaje zlokalizowany i naprawiony. Uzyskali\u015bmy plik wyj\u015bciowy z po\u0142\u0105czonymi danymi w dw\u00f3ch zak\u0142adkach dotycz\u0105cych VAT naliczonego oraz VAT nale\u017cnego, z dodatkow\u0105 kolumn\u0105 [Okres VAT]. Szczeg\u00f3\u0142owe opisanie naszych wymaga\u0144 oraz za\u0142o\u017ce\u0144 w promptcie, w tym informacji o \u015bcie\u017ckach, nazwach zak\u0142adek i strukturze plik\u00f3w pozwoli\u0142o uzyska\u0107 dzia\u0142aj\u0105ce makro.<\/p> <\/p> Po po\u0142\u0105czeniu plik\u00f3w, mo\u017cemy dodawa\u0107 kolejne elementy automatyzuj\u0105ce proces. Na przyk\u0142ad ChatGPT mo\u017ce stworzy\u0107 skrypt generuj\u0105cy plik z list\u0105 transakcji spe\u0142niaj\u0105cych zadane przez nas kryteria. Om\u00f3wmy to na przyk\u0142adzie transakcji obj\u0119tych mechanizmem podzielonej p\u0142atno\u015bci. Obowi\u0105zek zastosowania tego mechanizmu maj\u0105 podatnicy VAT, kt\u00f3rzy:<\/p>1. Gromadzenie danych<\/strong><\/h4>
2. Oczyszczanie danych<\/strong> <\/h4>
3. Przetwarzanie danych<\/strong><\/h4>
4. Weryfikacja<\/strong><\/h4>
Przyk\u0142ad praktyczny – wygodne \u0142\u0105czenie danych<\/strong><\/h3>
1. Okre\u015blenie potrzeb i za\u0142o\u017ce\u0144<\/strong><\/h4>
![\"\"](\"https:\/\/haimagazine.com\/wp-content\/uploads\/2024\/06\/1.jpg\")
2. Tworzenie promptu<\/strong><\/h4>
TRE\u015a\u0106 PROMPTU
<\/code><\/strong>
Chcemy po\u0142\u0105czy\u0107 wiele plik\u00f3w [xlsx] w jeden zbiorczy plik. Wykorzystajmy VBA z pakietu Microsoft 365 . Oto za\u0142o\u017cenia i szczeg\u00f3\u0142y:
1. Pliki umieszczone s\u0105 w folderze [C:\\Przyk\u0142ady\\1\\Input].
2. Liczba plik\u00f3w jest zmienna.
3. W ka\u017cdym z plik\u00f3w s\u0105 dwie zak\u0142adki o nazwach [VAT naliczony] oraz [VAT nale\u017cny].
4. Liczba kolumn w obu zak\u0142adkach jest sta\u0142a [10 kolumn].
5. Nazwy kolumn znajduj\u0105 si\u0119 w wierszu numer 1 w plikach wej\u015bciowych. W pliku wyj\u015bciowym skopiuj nazwy kolumn z pierwszego pliku wej\u015bciowego i umie\u015b\u0107 nazwy kolumn tylko w pierwszym wierszu w obu zak\u0142adkach w pliku wyj\u015bciowym.
6. W pliku wyj\u015bciowym chcemy mie\u0107 r\u00f3wnie\u017c dwie oddzielne zak\u0142adki [VAT naliczony] oraz [VAT nale\u017cny]. Ma by\u0107 w niej umieszczona w ka\u017cdym z wierszy nazwa pliku, z kt\u00f3rego dane zosta\u0142y pobrane.
7. W jedenastej kolumnie w pliku wyj\u015bciowym dodaj kolumn\u0119 o nazwie [Okres VAT].
8. Plik roboczy do \u0142\u0105czenia danych b\u0119dzie u\u017cywany co miesi\u0105c z now\u0105 paczk\u0105 plik\u00f3w.
9. Po sko\u0144czeniu tworzenia pliku wyj\u015bciowego pytaj u\u017cytkownika, gdzie zapisa\u0107 dany plik.<\/code><\/em><\/td><\/tr><\/tbody><\/table><\/figure><\/div><\/div>ODPOWIED\u0179 MODELU
<\/strong>
Aby po\u0142\u0105czy\u0107 wiele plik\u00f3w XLSX w jeden zbiorczy plik przy u\u017cyciu VBA w pakiecie Microsoft 365, musimy stworzy\u0107 makro, kt\u00f3re b\u0119dzie spe\u0142nia\u0107 podane za\u0142o\u017cenia. Poni\u017cej znajduje si\u0119 szczeg\u00f3\u0142owy kod VBA, kt\u00f3ry realizuje ten cel:
1. Otw\u00f3rz Excel i przejd\u017a do edytora VBA (Alt + F11).
2. Przejd\u017a do ThisWorkbook (kliknij dwukrotnie na \"ThisWorkbook\" w \"VBAProject\").
3. Wklej poni\u017cszy kod do ThisWorkbook
Sub PolaczPliki()
Dim FolderPath As String
Dim outputWorkbook As Workbook
Dim inputWorkbook As Workbook
Dim outputSheet1 As Worksheet
Dim outputSheet2 As Worksheet
Dim inputSheet1 As Worksheet
Dim inputSheet2 As Worksheet
Dim FileName As String
Dim LastRow As Long
Dim lastRowOut1 As Long
Dim lastRowOut2 As Long
Dim okresVAT As String
Dim SavePath As String
Dim i As Integer
' \u015acie\u017cka do folderu z plikami wej\u015bciowymi
FolderPath = \"C:\\Przyk\u0142ady\\1\\Input\\\"
' Utworzenie nowego skoroszytu wynikowego
Set outputWorkbook = Workbooks.Add
Set outputSheet1 = outputWorkbook.Sheets(1)
outputSheet1.Name = \"VAT naliczony\"
Set outputSheet2 = outputWorkbook.Sheets.Add(After:=outputWorkbook.Sheets(1))
outputSheet2.Name = \"VAT nale\u017cny\"
' Pobranie listy plik\u00f3w w folderze
FileName = Dir(FolderPath & \"*.xlsx\")
' Inicjalizacja flagi kolumn nag\u0142\u00f3wk\u00f3w
Dim headerSet As Boolean
headerSet = False
' Przetwarzanie ka\u017cdego pliku
Do While FileName <> \"\"
Set inputWorkbook = Workbooks.Open(FolderPath & FileName)
' Pobranie zak\u0142adek z pliku wej\u015bciowego
Set inputSheet1 = inputWorkbook.Sheets(\"VAT naliczony\")
Set inputSheet2 = inputWorkbook.Sheets(\"VAT nale\u017cny\")
' Ustawienie nag\u0142\u00f3wk\u00f3w w pliku wyj\u015bciowym (je\u015bli jeszcze nie ustawione)
If Not headerSet Then
For i = 1 To 10
outputSheet1.Cells(1, i).Value = inputSheet1.Cells(1, i).Value
outputSheet2.Cells(1, i).Value = inputSheet2.Cells(1, i).Value
Next i
outputSheet1.Cells(1, 11).Value = \"Okres VAT\"
outputSheet2.Cells(1, 11).Value = \"Okres VAT\"
headerSet = True
End If
' Skopiowanie danych z zak\u0142adki \"VAT naliczony\"
LastRow = inputSheet1.Cells(inputSheet1.Rows.Count, 1).End(xlUp).Row
lastRowOut1 = outputSheet1.Cells(outputSheet1.Rows.Count, 1).End(xlUp).Row + 1
inputSheet1.Range(\"A2:J\" & LastRow).Copy Destination:=outputSheet1.Range(\"A\" & lastRowOut1)
outputSheet1.Range(\"K\" & lastRowOut1 & \":K\" & lastRowOut1 + LastRow - 2).Value = FileName
' Skopiowanie danych z zak\u0142adki \"VAT nale\u017cny\"
LastRow = inputSheet2.Cells(inputSheet2.Rows.Count, 1).End(xlUp).Row
lastRowOut2 = outputSheet2.Cells(outputSheet2.Rows.Count, 1).End(xlUp).Row + 1
inputSheet2.Range(\"A2:J\" & LastRow).Copy Destination:=outputSheet2.Range(\"A\" & lastRowOut2)
outputSheet2.Range(\"K\" & lastRowOut2 & \":K\" & lastRowOut2 + LastRow - 2).Value = FileName
inputWorkbook.Close SaveChanges:=False
FileName = Dir
Loop
' Pytanie u\u017cytkownika o miejsce zapisu pliku wynikowego
With Application.FileDialog(msoFileDialogSaveAs)
.Title = \"Zapisz plik wynikowy\"
.FilterIndex = 1
If .Show = -1 Then
SavePath = .SelectedItems(1)
outputWorkbook.SaveAs FileName:=SavePath
End If
End With
outputWorkbook.Close SaveChanges:=True
MsgBox \"Plik zosta\u0142 zapisany jako \" & SavePath
End Sub
Wyja\u015bnienie:<\/strong>
Deklaracja zmiennych:<\/strong> Deklarujemy zmienne potrzebne do przechowywania \u015bcie\u017cek, nazw plik\u00f3w, skoroszyt\u00f3w i arkuszy.
Pobieranie \u015bcie\u017cki i nazwy pliku wyj\u015bciowego:<\/strong> U\u017cytkownik jest pytany o lokalizacj\u0119 i nazw\u0119 pliku wyj\u015bciowego.
Tworzenie nowego pliku wyj\u015bciowego: <\/strong>Tworzony jest nowy skoroszyt z dwoma arkuszami \"VAT naliczony\" i \"VAT nale\u017cny\".
Przetwarzanie plik\u00f3w w folderze:<\/strong> P\u0119tla przechodzi przez wszystkie pliki XLSX w folderze, otwieraj\u0105c je i kopiuj\u0105c odpowiednie dane do pliku wyj\u015bciowego.
Kopiowanie nag\u0142\u00f3wk\u00f3w:<\/strong> Nag\u0142\u00f3wki kolumn s\u0105 kopiowane tylko raz, z pierwszego pliku wej\u015bciowego.
Kopiowanie danych:<\/strong> Dane s\u0105 kopiowane do odpowiednich arkuszy w pliku wyj\u015bciowym, a nazwa pliku \u017ar\u00f3d\u0142owego jest dodawana do jedenastej kolumny.
Zamkni\u0119cie plik\u00f3w i zapisanie pliku wyj\u015bciowego:<\/strong> Plik wyj\u015bciowy jest zapisywany w lokalizacji wybranej przez u\u017cytkownika.
Upewnij si\u0119, \u017ce masz odpowiednie uprawnienia do odczytu i zapisu plik\u00f3w w okre\u015blonych lokalizacjach oraz \u017ce wszystkie pliki s\u0105 zgodne z za\u0142o\u017ceniami (tj. maj\u0105 odpowiednie arkusze i nag\u0142\u00f3wki).<\/em><\/code><\/td><\/tr><\/tbody><\/table><\/figure><\/div><\/div><\/div>3. Weryfikacja<\/strong><\/h4>
![\"\"](\"https:\/\/haimagazine.com\/wp-content\/uploads\/2024\/06\/Wlaczenie-trybu-dewelopera-1024x869.png\")
![\"\"](\"https:\/\/haimagazine.com\/wp-content\/uploads\/2024\/06\/image-1024x701.png\")
![\"\"](\"https:\/\/haimagazine.com\/wp-content\/uploads\/2024\/06\/8.png\")
![\"\"](\"https:\/\/haimagazine.com\/wp-content\/uploads\/2024\/06\/Zapisanie-pliku-2.png\")
![\"\"](\"https:\/\/haimagazine.com\/wp-content\/uploads\/2024\/06\/6.jpg\")
4. Dodawanie kolejnych funkcjonalno\u015bci<\/strong><\/h4>