Thema Datum  Von Nutzer Rating
Antwort
Rot Word VBA, Sub Aufruf wenn Hochformat / Querformat BIld
30.04.2015 01:14:57 M_P
NotSolved
30.04.2015 16:04:09 Gast59485
NotSolved

Ansicht des Beitrags:
Von:
M_P
Datum:
30.04.2015 01:14:57
Views:
1230
Rating: Antwort:
  Ja
Thema:
Word VBA, Sub Aufruf wenn Hochformat / Querformat BIld

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


Ihre Antwort
  • 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: Name: Email:

 
 

  • 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
Rot Word VBA, Sub Aufruf wenn Hochformat / Querformat BIld
30.04.2015 01:14:57 M_P
NotSolved
30.04.2015 16:04:09 Gast59485
NotSolved