Leider kann ChatGPT nicht direkt VBA-Code oder Funktionen schreiben. Es kann jedoch ĂŒber allgemeine Konzepte und Syntax von VBA informieren und Anleitungen zur Programmierung in VBA bereitstellen.
ChatGPT ĂŒber sich selbst
Allerdings erzeugt ChatGPT brauchbaren Code (sogar mit deutschen Kommentaren) , z.B. hier bei der Frage nach einer Funktion in VBA fĂŒr Access zur Auswahl einer Datei, mit einer Endung passend zum Parameter.
Function GetFileNameWithExtension(ByVal strExtension As String) As String
Dim fd As FileDialog
Dim strFile As String
Set fd = Application.FileDialog(msoFileDialogFilePicker)
fd.Filters.Clear
fd.Filters.Add "Selected Files", "*." & strExtension
If fd.Show = -1 Then
GetFileNameWithExtension = fd.SelectedItems(1)
Else
GetFileNameWithExtension = ""
End If
End Function
Sie können die Funktion wie folgt verwenden:
strFile = GetFileNameWithExtension("txt")
If strFile <> "" Then
'AusgewÀhlte Datei verarbeiten
End If
No responses yet