Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
688to692
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
688to692
688to692
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Script in VBA ausführen

Script in VBA ausführen
31.10.2005 19:09:05
Peter
Hallo,
habe ein Problem, möchte gerne Systeminformationen aus dem WMI Code greator also Scripte in Excel starten und die Infomation weiter verarbeiten.
Wer kann helfen.
Danke
gruß Peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Script in VBA ausführen
31.10.2005 19:12:09
Ramses
Hallo
Ich möchte gerne fliegen, also Flugzeuge starten.
Wer kann helfen ;-)
Kannst du mal etwas detaillierter werden was du da machen willst ?
Das meiste ist in VBA direkt zu lösen, allenfalls mit API Funktionen
Gruss Rainer
AW: Script in VBA ausführen
31.10.2005 19:13:04
Nepumuk
Hallo Peter,
das kannst du doch in VBA. Beispiel:
' **********************************************************************
' Modul: Modul5 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Public Sub test()
    GetCPUData
End Sub

Private Sub GetCPUData(Optional ByVal strComputerName As String = ".")
    Dim oWMI As Object, oResult As Object, oItem As Object
    Set oWMI = GetObject("winmgmts:\\" & strComputerName)
    Set oResult = oWMI.InstancesOf("Win32_Processor")
    For Each oItem In oResult
        Debug.Print "Takt (MHz) : " & oItem.MaxClockSpeed
    Next
End Sub

Gruß
Nepumuk
Anzeige
AW: Script in VBA ausführen
31.10.2005 19:58:40
Peter
Hi,
super genau dass habe ich gesucht.
Nochmals vielen Dank.
schönen Abend noch.
Peter

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige