Thema Datum  Von Nutzer Rating
Antwort
23.10.2024 09:05:26 Natalie
NotSolved
25.10.2024 23:27:32 Gast51370
NotSolved
Rot Sichtfeld automatisch skalieren (Zoom)
 26.10.2024 10:56:40 volti
NotSolved
26.10.2024 12:32:25 GTA
NotSolved
28.10.2024 07:33:40 Natalie
NotSolved
28.10.2024 11:16:33 GTA
NotSolved
28.10.2024 12:38:34 Natalie
NotSolved
28.10.2024 13:13:12 Gast81826
Solved
29.10.2024 07:42:17 Natalie
NotSolved

Ansicht des Beitrags:
Von:
volti		 Datum:
26.10.2024 10:56:40		 Views:
64		 Rating:
     
Antwort:
  Ja
Thema:
Sichtfeld automatisch skalieren (Zoom)

Hallo Natalie,

 

ergänzend zum Tipp von Gast51370....

So kannst Du die aktuelle Bildschirmauflösung ermitteln.

Code:
 
1
2
3
4
5
6
7
8		  
Declare PtrSafe Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long

Sub Bildschirmaufloesung()
  Dim x As Long, y As Long

  x = GetSystemMetrics(0): y = GetSystemMetrics(1)
  Debug.Print "Aktuelle Auflösung: " & x & "x" & y
End Sub
 
_________
viele Grüße
Karl-Heinz

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
23.10.2024 09:05:26 Natalie
NotSolved
25.10.2024 23:27:32 Gast51370
NotSolved
Rot Sichtfeld automatisch skalieren (Zoom)
 26.10.2024 10:56:40 volti
NotSolved
26.10.2024 12:32:25 GTA
NotSolved
28.10.2024 07:33:40 Natalie
NotSolved
28.10.2024 11:16:33 GTA
NotSolved
28.10.2024 12:38:34 Natalie
NotSolved
28.10.2024 13:13:12 Gast81826
Solved
29.10.2024 07:42:17 Natalie
NotSolved