|
Hallo liebes VBA Forum :)
Ich hab folgendes problem:
Ich habe zwei Subs gebastelt sub hoch (path as String) und sub quer (path as String) die jeweils eine Tabelle mit bestimmten Formartierungen usw. für hochformat oder querformat Bilder erstellen.
Nachdem die jewilige Tabelle generiert wurde, wird eine bestimmte Zelle aus der Tabelle mit ".Select" ausgewählt, in die wird später das Bild reinkopiert.
Das klappt soweit!.
Ich brauche erstrmal ( ;) ) an einer Stellen Hilfe.
Ich brauche ein Sub:
1. welches den WIndows Explorer öffnet
2. mich eine Datei (in meinem Fall ein Bild) auswählen lässt (es muss nicht nach Dateiendungen filtern)
3. die Anzahl der Pixel in Breite u. Höhe ausließt.
4. den Pfad abspeichert
5. Es soll dann, wenns mehr Pixel in der Breite hat, also demnach Querfomat ist, sub quer() mit dem Pfad als Parameter öffnen, sonst halt sub hoch() mit Pfad als Parameter.
Ich weiß das man mit .Height und .Width die Breite / Höhe ausließt.
Ein If, welches dann den passenden sub aufruft hab ich auch.
Wie setze ich den Rest um? Ich bin relativ neu in VBA und verstehs nicht ganz. Ein paar Sachen überfordern mich noch :/
Viele Grüße
M_P
|