Thema Datum  Von Nutzer Rating
Antwort
Rot shell execute
 07.12.2011 13:32:46 Gast97959
NotSolved
08.12.2011 02:25:10 Till
NotSolved
08.12.2011 07:15:17 Gast77472
Solved

Ansicht des Beitrags:
Von:
Gast97959		 Datum:
07.12.2011 13:32:46		 Views:
1702		 Rating:
     
Antwort:
  Ja
Thema:
shell execute

Hallo,

 

ich habe mit VBA einen code programmiert, welcher über die eingabe einer Teilenummer die dazugehörige pdf öffnet.

 

 

Ich möchte nun eine Massagebox oder ähnliches einbauen die erscheint falls shell execute keine PDF zur dazugehörigen Teilenummer findet.

 

könnt ihr mir da weiterhelfen ?

 

 

hier mein quellcode:
 

Public Sub Einscannen()


Dim Datei As String
Dim Var As String
Dim Wahr As String
Dim Teileanzahl As String
Dim Nummer As String
Dim Endung As String


    
Worksheets("Scanner").Activate
    

    Nummer = Worksheets("Scanner").Cells(1, 1)
    
    Endung = ".pdf"
    
    Datei = "C:/Explosionszeichnungen/" + Nummer + Endung

        ShellExecute 0, _
        "Open", _
        Datei, _
        vbNullString, _
        vbNullString, _
        vbNormalFocus



MsgBox ("Hallo")



Sheets("Scanner").Select
Worksheets("Scanner").Cells(1, 1).Select

End Sub

 

 

vielen dank !

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 shell execute
 07.12.2011 13:32:46 Gast97959
NotSolved
08.12.2011 02:25:10 Till
NotSolved
08.12.2011 07:15:17 Gast77472
Solved