Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
07.05.2024 11:52:21 |
Surrie |
|
|
|
07.05.2024 12:08:21 |
Mase |
|
|
|
07.05.2024 12:29:13 |
Gast86958 |
|
|
|
07.05.2024 13:42:26 |
Surrie |
|
|
|
07.05.2024 14:06:34 |
Mase |
|
|
|
07.05.2024 13:18:03 |
Gast21787 |
|
|
|
07.05.2024 13:46:00 |
Gast9686 |
|
|
|
07.05.2024 14:01:09 |
Gast31379 |
|
|
|
07.05.2024 14:14:51 |
Gast93945 |
|
|
|
07.05.2024 14:48:23 |
Gast20819 |
|
|
|
07.05.2024 15:07:57 |
Gast59678 |
|
|
|
07.05.2024 15:15:31 |
Gast10387 |
|
|
|
07.05.2024 17:16:55 |
Gast39559 |
|
|
|
07.05.2024 15:30:32 |
Surrie |
|
|
Pfad einlesen Excel |
07.05.2024 15:40:36 |
Gast23659 |
|
|
|
07.05.2024 15:40:47 |
Surrie |
|
|
|
07.05.2024 15:44:00 |
Gast55468 |
|
|
|
07.05.2024 15:56:17 |
Surrie |
|
|
|
07.05.2024 16:03:56 |
Gast62082 |
|
|
|
07.05.2024 16:24:41 |
Gast49248 |
|
|
|
07.05.2024 17:01:11 |
Gast82588 |
|
|
|
07.05.2024 17:06:36 |
Gast35616 |
|
|
|
07.05.2024 18:08:43 |
Surrie |
|
|
|
08.05.2024 07:47:09 |
Mase |
|
|
|
08.05.2024 22:45:28 |
Gast9375 |
|
|
|
09.05.2024 12:23:23 |
Surrie |
|
|
Von:
Gast23659 |
Datum:
07.05.2024 15:40:36 |
Views:
275 |
Rating:
|
Antwort:
|
Thema:
Pfad einlesen Excel |
Ersetzt mal TryParseFolderName durch das hier:
die Änderungen zu vorher sind hervorgehoben
Private Function TryParseFolderName(Folder As String, ByRef FolderInfo As FolderInfo) As Boolean
Dim fi As FolderInfo
With CreateObject("VBScript.RegExp")
.Global = False
.IgnoreCase = True
.MultiLine = False
.Pattern = "([^\\_]+?(\d+))_.+$"
With .Execute(Folder)
If .Count > 0 Then
fi.Id = CLng(.Item(0).Submatches(1))
fi.Status = Mid$(.Item(0).Value, 13, 1)
fi.FullName = .Item(0).Value
FolderInfo = fi
TryParseFolderName = True
End If
End With
End With
End Function
Es würde auch reichen die hervorgehobenen Zeilen zu kopieren.
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
07.05.2024 11:52:21 |
Surrie |
|
|
|
07.05.2024 12:08:21 |
Mase |
|
|
|
07.05.2024 12:29:13 |
Gast86958 |
|
|
|
07.05.2024 13:42:26 |
Surrie |
|
|
|
07.05.2024 14:06:34 |
Mase |
|
|
|
07.05.2024 13:18:03 |
Gast21787 |
|
|
|
07.05.2024 13:46:00 |
Gast9686 |
|
|
|
07.05.2024 14:01:09 |
Gast31379 |
|
|
|
07.05.2024 14:14:51 |
Gast93945 |
|
|
|
07.05.2024 14:48:23 |
Gast20819 |
|
|
|
07.05.2024 15:07:57 |
Gast59678 |
|
|
|
07.05.2024 15:15:31 |
Gast10387 |
|
|
|
07.05.2024 17:16:55 |
Gast39559 |
|
|
|
07.05.2024 15:30:32 |
Surrie |
|
|
Pfad einlesen Excel |
07.05.2024 15:40:36 |
Gast23659 |
|
|
|
07.05.2024 15:40:47 |
Surrie |
|
|
|
07.05.2024 15:44:00 |
Gast55468 |
|
|
|
07.05.2024 15:56:17 |
Surrie |
|
|
|
07.05.2024 16:03:56 |
Gast62082 |
|
|
|
07.05.2024 16:24:41 |
Gast49248 |
|
|
|
07.05.2024 17:01:11 |
Gast82588 |
|
|
|
07.05.2024 17:06:36 |
Gast35616 |
|
|
|
07.05.2024 18:08:43 |
Surrie |
|
|
|
08.05.2024 07:47:09 |
Mase |
|
|
|
08.05.2024 22:45:28 |
Gast9375 |
|
|
|
09.05.2024 12:23:23 |
Surrie |
|
|