Passwörter und Benutzernamen besser lesbar machen

[VBATartar]

Hallöchen,

ich habe mir mittels Firfox-AddIn alle meine Internetkonten mit Benutzernamen samt Passwort in eine csv Datei geschrieben. Wenn ich diese Daten nun in eine Excel-Tabelle importiere, haben diese Informationen ein etwas sehr sperriges Format und sind benutzerunfreundlich zu lesen.


Insgesamt haben die Daten aus der csv Datei in den einzelnen Excel-Zellen folgende Struktur:
hostname,"username","password","formSubmitURL","httpRealm","usernameField","passwordField"
ergibt in der Praxis:
http://web.de,"klimbim","abcd99","https://login.web.de","","username","password"

Ich möchte nun folgende Ausgabe für dieses sperrige Format haben:
Internetseite: web.de
Benutzer: klimbim
Passwort: abcd99

Könnt ihr einen solchen Code in VBA schreiben?

[Kl@us-M.]

Hi,

warum denn VBA, wenn es mit ein paar Mausklicks und Bordmitteln geht:

1. Daten -> Text in Spalten -> Trennzeichen Komma
2. Zeilen markieren, kopieren, Inhalte einfügen, Transponieren

Wenn es denn unbedingt VBA sein muss, zeichne die Aktionen mit dem Rekorder auf ...

[VBATartar]

@Klaus,
danke für deine Hilfe, aber ich bräuchte dann doch die VBA Lösung.

[RPP63]

Hallo Tartar (*lecker*, gleich gibt es ne Knifte!)!
Warum VBA, wenn sich so etwas mit Bordmitteln oder Formeln lösen lässt?
Hast Du mehr als 1.000 Accounts?
Erstmal nur für das wiederkehrende Transponieren der Überschrift:

	A	B	C	D	E
1	hostname	username	password		hostname
2	http://web.de	klimbim	abcd99		username
3	http://wc.de	kokolores	xyz6		password
4	http://mist.de	rhabarber	jdlf0		hostname
5	http://kacke.de	kamelle	uajdöfkjx1		username
6					password
7					hostname
8					username
9					password

Formeln der Tabelle

Zelle Formel E1 =INDEX(A$1:C$1;1;REST(ZEILE(A3);3)+1)

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Gruß Ralf

[RPP63]

Nach der Knifte der Rest:

	A	B	C	D	E	F
1	hostname	username	password		hostname	http://web.de
2	http://web.de	klimbim	abcd99		username	klimbim
3	http://wc.de	kokolores	xyz6		password	abcd99
4	http://mist.de	rhabarber	jdlf0		hostname	http://wc.de
5	http://kacke.de	kamelle	uajdöfkjx1		username	kokolores
6					password	xyz6
7					hostname	http://mist.de
8					username	rhabarber
9					password	jdlf0
10					hostname	http://kacke.de
11					username	kamelle
12					password	uajdöfkjx1
13					hostname
14					username
15					password

Formeln der Tabelle

Zelle Formel E1 =INDEX(A$1:C$1;1;REST(ZEILE(A3);3)+1) F1 =WENNFEHLER(INDEX(A$1:C$5;AUFRUNDEN(ZEILE(A1)/3;0)+1;REST(ZEILE(A3);3)+1);"")

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Gruß Ralf

[VBATartar]

Hallo Ralf,

Sorry aber ich komme mit deiner Formellösung nicht klar. Habs zig-mal versucht.

Wenn ich in der Zelle A1  bis irgendwas  folgendes drin stehe habe:

http://web.de,"klimbim","abcd99","https://login.web.de","","username","password"

spalten deine Formeln in  E und F bei mir nichts auf.

[RPP63]

Hi!
Bevor Du Dich an VBA versuchst:
Eine CSV sollte man in Excel nicht öffnen, sondern über
Daten, externe Daten, aus Text
importieren.
Dann hast Du Dir schon mal das "Text in Spalten" gespart, wenn Du den richtigen Listenseparator eingibst.
Dann brauchst Du nur noch meine beiden Formeln auf Deine Belange anzupassen.

Ich weiß, ist jetzt blöd, aber Du solltest mal tatsächlich die ersten vier Zeilen Deiner .CSV anonymisieren und hier hochladen, dann kann ich Dir auch konkret helfen.

Gruß Ralf

[schauan]

Hallöchen,

also, wenn Du den kompletten String in einer Zelle hast, kann es nicht gehen. Wie Du aber aus den Antworten entnehmen kannst, steht dort nicht alles in einer Zelle.
Klaus-Martin hat Dir z.B. geschrieben, Du sollst mit "Text ins Spalten" den Text erst mal auf einzelne Zellen verteilen.
Ralf hat dann eine Formellösung gepostet. Die funktioniert auf dieser Basis auch, auch bei mir :

Arbeitsblatt mit dem Namen 'Tabelle1'
	A	B	C	D	E	F
1	hostname	username	password		hostname	http://web.de
2	http://web.de	klimbim	abcd99		username	klimbim
3	http://wc.de	kokolores	xyz6		password	abcd99
4	http://mist.de	rhabarber	jdlf0		hostname	http://wc.de
5	http://kacke.de	kamelle	uajdöfkjx1		username	kokolores
6					password	xyz6
7					hostname	http://mist.de
8					username	rhabarber
9					password	jdlf0
10					hostname	http://kacke.de
11					username	kamelle
12					password	uajdöfkjx1

Zelle	Formel
E1	=INDEX(A$1:C$1;1;REST(ZEILE(A3);3)+1)
F1	=WENNFEHLER(INDEX(A$1:C$5;AUFRUNDEN(ZEILE(A1)/3;0)+1;REST(ZEILE(A3);3)+1);"")

Diese Tabelle wurde mit Tab2Html (v2.5.0) erstellt. ©Gerd alias Bamberg

Steht denn alles in A1?
Dann passt der Vorschlag von Klaus-Martin aber zu 100%, allerdings wegen einer Zelle ein Makro schreiben ...
Du kannst die Aktionen per Makrorekorder aufzeichnen und dann ablaufen lassen.
irgendeine andere Zele anklicken
Makrorekoder starten
a1 anklicken
text in Spalten ausführen
Daten in Zeile 1 Markieren
Kopieren
A2 anklicken oder gewünschte Zielzelle
Inhalte Einfügen / Option Transponieren
ESC drücken
eventuell Zeile 1 löschen
Makrorekorder beenden.

Falls da doch mehr im Spiel ist als a1 bzw. in A1 dann mehrere Zugänge stehen, kannst Du den Code posten und die Anforderungen genau beschreiben. Wir optimieren das dann. Wäre ja dumm, wenn Du in A1 20 Zugänge hast und immer 3 kopierst, einfügst, die nächsten kopierst ...
Wenn alles dann in einer Zeile steht, wäre aber auch ohne VBA per Formel lösbar ...

[VBATartar]

Hallo Leute,

ihr alle hattet absolut Recht es muss nicht immer VBA sein! Ich habs jetzt hingekriegt und mußte einsehen, dass VBA hier eigentlich völlig überflüssig ist.
Danke euch allen!