wulfgang

Ist die Frage zu trivial oder kann mir niemand helfen?

Hallo,

ich möchte in meiner Datenbank gerne einen neunen Nutzer einfügen. Habe die Datenbank auch exklusiv geöffnet. Leider erhalte ich trotzdem noch die im Screenshot dargestellte Meldung. Kann mir jemand helfen?

Gibt es denn sonst keine Möglichkeit das Bild zu verkleinern?

Hallo,

die Bedienungsanleitung steht mir leider nicht zur Verfügung. Was hat das denn mit dem Bildkontrast auf sich? Wo kann das eingestellt werden?

Hallo,

ich stehe vor folgendem Problem. Ich möchte mit Powerpoint eine Präsentation halten. Die Präsentation wird von einem BEamer an eine Wand projeziert. Das projezierte Bild ist jedoch zu groß. Wie bekomme ich die Anzeige nun kleiner?(Die Anzeigegröße vom Beamer haber ich schon kleinstmöglich eingestellt und der Beamer ist festgeschraubt)

Hallo,

ja das war es!!

Danke

Hallo,

ich wollte fragen, ob jemand weiß, wie ich in VBA die Userform gegen das Schließen mit dem Kreuz sperre, sie aber trotzdem noch verschiebbar ist.

Okay vielen Dank für die Antwort!

Hallo,

ich habe mal eine Frage zu UML. Ich habe eine Sammelklasse. Diese Sammelklasse kann mehrere Instanzen von einer Klasse 1 beinhalten. ist also eine Art Collection. Wie stelle ich das in EINEM Block dar?

Ja ich habe schon verstanden. Danke für die Ratschläge. Habe meinen OC plattgemacht und alles neu installiert.

Grüße

Vielleicht eine dumme Frage. Aber ich kann meine Daten doch nur noch per USB-Stick sichern oder? Das CD-Laufwerk brauche ich ja für die Boot-CD.

Gelangt der Virus automatisch auf einen USB-Stick, wenn ich diesen an den betroffenen Rechner anschließe?

G

Plattmachen will ich im Moment nicht. Ich kann mit dem PC sonst auch normal arbeiten. Nur fehlt halt das Netzwerk mit Internet.

Kann mir jemand mal einen Link zu einem von CD oder USB Stick ausführbaren Viren Scaner geben, mit dem ich den Kram wieder entfernen kann? Mit den Suchergebnissen von google konnte ich nicht so viel anfangen...

Hallo,

ich habe ein großes Problem. habe mir auf einer Tauschbörse ein Tool runtergeladen und es ausgeführt. Seitdem komme ich nicht mehr in das Internet. Bei den Drahtlosverbindungen wird angezeigt, dass sie nicht konfiguriert werden können. AntiVir hat sich geschlossen und lässt sich nicht mehr starten oder neu installieren. Bei jedem Start werde ich gefragt, ob ich winupgro.exe ausführen möchte. Wenn ich es nicht ausführe sind die Fehler trotzdem vorhanden.

Weiß jemand was ich tun muss? Bin ein wenig verzweifelt!

Hallo,

ich habe versucht in VBA einen Konstruktor mit Paramterübergabe nachzubilden. Ich habe es nach diesem Beispiel versucht. Excel VBA Konstruktor mit Parameterübergabe - Mikrocontroller.net

Leider erhalte ich immer die Meldung

Object required

Hatte schon mal jemand das Problem?

Guten Morgen,

ich habe mal eine Frage. Wenn in VBA eine Funktion einen Array zurückgeben soll, deklariert man als Rückgabetyp ja Variant. Variant-Datentypen werden ja erst zur Laufzeit auf einen bestimmten Datentyp festgelegt. Gibt es eine Erklärung warum ich bei der Deklaration einer Funktion als Rückgabetyp nicht direkt einen Array angeben kann?

Hallo,

also so funktioniert es:

Private iValue As Double

Private jValue As Double

Private kValue As Double


Sub setValues(i As Double, j As Double, k As Double)

iValue = i

jValue = j

kValue = k

End Sub


Public Function FuncGetiValue() As Double

FuncGetiValue = iValue

End Function


Public Function FuncGetjValue() As Double

FuncGetjValue = jValue

End Function


Public Function FuncGetkValue() As Double

FuncGetkValue = kValue

End Function


Sub CopyObjects(OldObject As Class1)

iValue = OldObject.FuncGetiValue

jValue = OldObject.FuncGetjValue

kValue = OldObject.FuncGetkValue

End Sub

Sub SubTestCopyObjects()

    Dim colObjects As Collection

    Dim Object1 As Class1

    Dim Object2 As Class1


    Set colObjects = New Collection

    Set Object1 = New Class1

    colObjects.Add Object1

    Set Object2 = New Class1

    Call Object2.CopyObjects(Object1)


End Sub

Weiß jemand vielleicht noch eine Möglichkeit, wie ich ohne diese öffentlichen Get-Methoden auskomme?

Hallo,

ich habe ein kleines Problem in VBA. Wollte ein Sub schreiben, das mir ein bereits vorhandenes Objekt kopiert.

Ich erhalte als Fehlermeldung:

Object doesn't support this property or method.

Sub SubTestCopyObjects()

    Dim colObjects As Collection

    Dim Object1 As Class1

    Dim Object2 As Class1


    Set colObjects = New Collection

    Set Object1 = New Class1

    colObjects.Add Object1

    Set Object2 = New Class1

    Object2.CopyObjects (Object1)

End Sub

Private iValue As Double

Private jValue As Double

Private kValue As Double


Sub setValues(i As Double, j As Double, k As Double)

iValue = i

jValue = j

kValue = k

End Sub


Sub CopyObjects(OldObject As Class1)

iValue = OldObject.iValue

jValue = OldObject.iValue

kValue = OldObject.iValue

End Sub

Hallo,

also ich verwende VBA. Es kommt leider keine Fehlermeldung...

Hallo,

weiß jemand ob es möglich ist mehrere Parameter in einer Methode zu übergeben?

Ich meine so etwas:

Aufrufende Umgebung:

Objekt.methode Parameter1, Parameter2

Sub methode(Parameter1 as double, Parameter2 as boolean)


End sub

Es kommt keine Fehlermeldung. Aber das Programm(ist zu groß zum posten) läuft nicht mehr korrekt ab. Kann mir jemand helfen?

Aber in dem Array befindet sich doch nur ein Verweis auf das Objekt, oder?

Hallo,

ja danke das set war die Lösung. Weiß auch jemand warum? Normalerweise benutze ich set ja nur für Objekte...

Hallo,

also mit Collection geht das ganze wunderbar einfach. Würde das ganze aber gerne auch mit einem Array realisieren.

Mein Klassenmodul sieht jetzt so aus:

Sub Test()

    Dim Liste(0 To 4)

    For x = 1 To 4 Step 1

        Dim Class1Objekt As Class1

        Set Class1Objekt = New Class1

        Liste(x) = Class1Objekt

    Next

End Sub

Liste(x) = Class1Objekt

die Meldung

Run time error 438

Object doesn't support this method or property

Hallo,

ich möchte in VBA ein Array mit Objekten füllen. Leider erhalte ich immer für die Zeile

Liste(x) = Class1Objekt

Run-time error '91' Object variable or With block variable not set

Sub Test()

    Dim Liste(5) As Class1

    For x = 1 To 4 Step 1

        Dim Class1Objekt As Class1

        Set Class1Objekt = New Class1

        Liste(x) = Class1Objekt

    Next


End Sub

Private strName As String


Public Property Let NameSet(Argument As String)

strName = Argument

End Property


Public Property Get NameReturn() As String

NameReturn = strName

End Property

Kann mir jemand helfen?

Ja, danke habe das Problem lösen können.