2017-06-20 3 views
0

Ich habe keine Ahnung, warum ich Laufzeitfehler 424 (Objekt erforderlich) für den Versuch, Bildanzahl = Anzahl in der Zelle festlegen. Jede mögliche Hilfe würdeObjekt erforderlich, obwohl Variable ist Ganzzahl

Public Function InsertPictureInCell() As Object 


     ImageCount = CInt(sheetImages.Cells(1, 4)) 
     Dim x As Object 


      sheetImages.Paste 
    Set x = sheetImages.Shapes(Selection) 
    x.top = [C4].top 
    x.Left = [C4].Left 
    x.Height = [C4].Height 
    Selection.ShapeRange.IncrementTop [C3].Height * ImageCount 

     'sheetImages.Shapes(picname).IncrementTop [C3].Height * ImageCount 
     sheetImages.Cells(ImageCount + 2, 2) = CStr(x.Name) 
     'sheetProject.Cells(12, 2) = PictureFileName 
End Function 
geschätzt werden
+0

Aktivieren Sie die Option Explicit am oberen Rand dieses Moduls. Es sieht so aus, als hättest du 'sheetImages' (oder eigentlich * keine * deiner Variablen) nicht deklariert. Abgesehen davon gibt es keine Zuweisung * zu * 'sheetImages', daher wird es als leere Variante initialisiert, wodurch der Fehler 424 ausgelöst wird, wenn Sie ihn wie ein Objekt behandeln, da es kein Objekt ist. –

Antwort

0

sheetImages erscheint ein Arbeitsblatt zu sein, aber ich sehe nicht, wurden, ist es Set

+0

Vielleicht ist es ein Arbeitsblatt Codename? –

+0

'sheetImages' scheint eine leere Variante zu sein, obwohl es vermutlich ein Arbeitsblatt sein soll :) –

+0

Ich könnte dumm sein. Ich habe alle diese in der Hauptfunktion eingestellt und beim Testen dieses eine habe ich nicht die Funktion aufgerufen, die diese Werte festgelegt. Es funktioniert jetzt. Danke –

0

Es sieht aus wie Sie nicht sheetImages erklärt haben (oder eigentlich jede von Ihre Variablen).

aus, dass abgesehen, gibt es keine Zuordnung -sheetImages, es sei denn, es von in Rahmen ist an anderer Stelle initilaized wird, ist es in dieser Funktion Umfang als eine leere Variante initialisiert ist, der die 424 Fehler aus, wenn Sie es wie ein behandeln Objekt, weil es kein Objekt ist.

Verwenden Sie Option Explicit oben im Codemodul, um die Variablendeklaration zu erzwingen (und Sie auf Tippfehler mit einem Kompilierungsfehler hinzuweisen).

Verwandte Themen