Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Mit VBS best. Zeichen aus einer Variable ausschneiden und in eine neue speichern

Frage Entwicklung VB for Applications

Mitglied: 22980

22980 (Level 1)

09.01.2006, aktualisiert 10.01.2006, 7039 Aufrufe, 5 Kommentare

Folgendes Problem:

Ich habe eine Variable mit dem Inhalt "2005_12_25_01" die ich aufteilen möchte, um sie am Ende als "25.12.2005" in eine neue Variable zu speichern.
Wie kann ich das machen, dass ich z.B. die Zeichen 1 bis 4, 6 bis 7 und 9 bis 10 in eigene Variablen speichern kann?

Bin für jeden Tipp dankbar!
Mitglied: Biber
09.01.2006 um 15:35 Uhr
Moin seeerg,

kopier Dir die folgenden Zeilen in Dein Projekt, dann erkennst Du das Prinzip.

Dim m, n, o, p As String
m = "2005_12_25_01"
p = Left(m, 4)
o = Mid(m, 6, 2)
p = Right(m, 2)
Debug.Print "m: " & m & " |n: " & n & "|o: " & o & "|p: " & p

Gruß Biber
[Edit nach gemini's Posting]
Gut, ein bisschen konkreter auf die Frage bezogen könnte ich es auch versuchen...*gg
StrDate="2005_12_25_01"
StrYear=Left(StrDate,4)
StrMonth=Mid(StrDate,6,2)
StrDay=Mid(StrDate,7,2)
StrDateGerman= StrDay & "." & StrMonth & "." & StrYear
' Ergebnis "25.12.2005"
[/Edit]
Bitte warten ..
Mitglied: gemini
09.01.2006 um 18:13 Uhr
... eine andere Möglichkeit:

strDate = "2005_12_25_01"
arrDate = Split(strDate,"_")

Das Array hat jetzt 4 Felder, die du wie Variablen verwenden kannst
arrDate(3) = 01
arrDate(2) = 25
arrDate(1) = 12
arrDate(0) = 2005

gemini
Bitte warten ..
Mitglied: gemini
09.01.2006 um 19:34 Uhr
Gut, ein bisschen konkreter auf die Frage bezogen könnte ich es auch versuchen...*gg
Yep, Biber, weil halt auch der Script Host mit der Variablentypisierung nicht soviel anfangen kann.
... und beim debug.print wirft es ihn dann komplett aus der Bahn

Gruß
gemini

PS: Is glaub ich das erste Mal, dass ich weniger Zeilen habe als du
Bitte warten ..
Mitglied: Biber
09.01.2006 um 19:53 Uhr
...uuups, gemini,

hast natürlich recht.
Ich war gedanklich total bei Access/VBA-Projekten statt bei VBS. *kopfschüttel*

Außerdem habe ich nebenbei telefoniert *rausred....

@22980
Konzentrier Dich auf die Lösung im zweiten Beitrag..
Ich habe hier die Antwort auf eine noch gar nicht gestellte Frage gegeben.

..so was..*immer noch kopfschüttelt*...
Bitte warten ..
Mitglied: 22980
10.01.2006 um 08:29 Uhr
Sehr gut Jungs!
Vielen Dank!
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst Formelergebnis in Variable speichern (1)

Frage von Juweee zum Thema VB for Applications ...

VB for Applications
gelöst Bestimmtes Arrayfeld mit Variable aufrufen? - VBS (10)

Frage von gabrixl zum Thema VB for Applications ...

Windows Update
WSUS best practice? (7)

Frage von leon123 zum Thema Windows Update ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Windows Update
MS: Update-Server-Adressen OHNE Wildcards (16)

Frage von mrserious73 zum Thema Windows Update ...

Multimedia & Zubehör
Laptop per HDMI an TV - einer geht, einer nicht (10)

Frage von dreizehneinhalb zum Thema Multimedia & Zubehör ...

Microsoft Office
+1.000 Ordner in Outlook: Wie besser? (10)

Frage von Matsushita zum Thema Microsoft Office ...