Thema Datum  Von Nutzer Rating
Antwort
Rot Max Wert Ermittlung
17.12.2012 13:48:55 Julius
NotSolved
17.12.2012 13:56:01 Gast65804
NotSolved
17.12.2012 15:30:20 Gast4756
NotSolved
17.12.2012 15:40:07 Gast37218
NotSolved
17.12.2012 15:52:45 Gast75381
NotSolved
17.12.2012 16:05:33 Gast48561
NotSolved
17.12.2012 16:14:06 Gast77977
NotSolved
17.12.2012 16:18:00 Gast23026
NotSolved
17.12.2012 16:29:26 Gast77983
NotSolved
17.12.2012 16:42:04 Gast63477
NotSolved
17.12.2012 16:42:33 Gast66572
NotSolved
17.12.2012 17:19:16 schokobons
NotSolved
17.12.2012 17:20:57 Gast37695
NotSolved
17.12.2012 17:45:17 Gast24186
NotSolved
18.12.2012 10:13:12 schokobons
NotSolved
18.12.2012 10:34:08 schokobons
NotSolved
18.12.2012 11:03:23 Gast264
NotSolved
18.12.2012 11:05:08 Gast85912
NotSolved
18.12.2012 12:35:31 schokobons
*****
Solved
18.12.2012 14:07:53 schokobons
NotSolved
18.12.2012 19:47:46 Gast22026
NotSolved
19.12.2012 09:59:50 schokobons
NotSolved

Ansicht des Beitrags:
Von:
Julius
Datum:
17.12.2012 13:48:55
Views:
2025
Rating: Antwort:
  Ja
Thema:
Max Wert Ermittlung

Hallo Leute,

bin ein blutiger VBA Anfäger und hänge gerade daran 4 verschiedene Integer Zahlen (Punktestände) auf den größten zu prüfen.

Da ich es mit array nicht geschafft habe dachte ich daran alle einzeln zu vergleichen, da geht jedoch mit meiner Schleife nicht.

Die sieht in etwa so aus

If intScore1 > intScore3 Then
ActivePresentation.Slides(59).Shapes("GewinnerShape").TextFrame.TextRange.Text = strName1
Else
If intScore1 > intScore4 Then
ActivePresentation.Slides(59).Shapes("GewinnerShape").TextFrame.TextRange.Text = strName1

Außerdem will er mein 

ActivePresentation.SlideShowWindow.View.GotoSlide (59)

 nicht akzeptieren und mekert das "there is currently no slide show view for this presentation"

 

Vielen Dank schonmal für eure Hilfe,

Gruß Julius


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 Max Wert Ermittlung
17.12.2012 13:48:55 Julius
NotSolved
17.12.2012 13:56:01 Gast65804
NotSolved
17.12.2012 15:30:20 Gast4756
NotSolved
17.12.2012 15:40:07 Gast37218
NotSolved
17.12.2012 15:52:45 Gast75381
NotSolved
17.12.2012 16:05:33 Gast48561
NotSolved
17.12.2012 16:14:06 Gast77977
NotSolved
17.12.2012 16:18:00 Gast23026
NotSolved
17.12.2012 16:29:26 Gast77983
NotSolved
17.12.2012 16:42:04 Gast63477
NotSolved
17.12.2012 16:42:33 Gast66572
NotSolved
17.12.2012 17:19:16 schokobons
NotSolved
17.12.2012 17:20:57 Gast37695
NotSolved
17.12.2012 17:45:17 Gast24186
NotSolved
18.12.2012 10:13:12 schokobons
NotSolved
18.12.2012 10:34:08 schokobons
NotSolved
18.12.2012 11:03:23 Gast264
NotSolved
18.12.2012 11:05:08 Gast85912
NotSolved
18.12.2012 12:35:31 schokobons
*****
Solved
18.12.2012 14:07:53 schokobons
NotSolved
18.12.2012 19:47:46 Gast22026
NotSolved
19.12.2012 09:59:50 schokobons
NotSolved