A döntés tárgya változó nincs beállítva (VBA Excel)
Vizuális Basic1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 Dim AAAC As Long Dim strSuchen As Variant Private Sub ComboBox1_Change () Ha ComboBox1.Value <> "" Akkor strSuchen = ComboBox1.Value AAAC = CDbl (tartomány ( "A2: A10") Find (Mi :. = StrSuchen, lookat: = xlWhole) .Row) TextBox1.Text = Cells (AAAC, 2) = TextBox2.Text A sejteket (AAAC, 4) TextBox3.Text = Cells (AAAC, 5) Else TextBox1.Text = "" TextBox2.Text = "" TextBox3.Text = "" End If End Sub Private Sub ComboBox2_Change () Ha ComboBox2.Value <> "" Akkor strSuchen = ComboBox2.Value AAAC = CDbl (tartomány ( "A2: A40") Find (Mi :. = StrSuchen, lookat: = xlWhole) .Row) TextBox4.Text = Cells (AAAC, 2) = TextBox5.Text A sejteket (AAAC, 4) TextBox6.Text = Cells (AAAC, 5) Else TextBox4.Text = "" TextBox5.Text = "" TextBox6.Text = "" End If End Sub Private Sub CommandButton2_Click () UserForm1.Hide End Sub Private Sub UserForm_Initialize () Dim sFilePath, objXL, Secur sFilePath = ActiveDocument.Path "\ Qw.xlsx" Set objXL = CreateObject ( "Excel.Application") „objXL.Visible = true wc = objXL.Workbooks.Open (sFilePath) ComboBox1.List = wc.Worksheets ( "A"). Tartomány (" A2: A10 ") Érték ComboBox2.List = wc.Worksheets (." A ") tartomány (." A2 :. A40 „) Érték objXL.Quit End SubPodskazhite kérem, mi a baj? Miért hiba módszer számos tárgy _global sikerült?
Egy lapon van egy tábla tetszőleges fejlécek listobject. Hogyan állapítható meg, hogy az aktuális cella része minden ilyen táblát? Ha igen, hogyan kell ellenőrizni: - függetlenül attól, hogy az utolsó sorban (vagy a vonal), - függetlenül attól, hogy a főcím ez a táblázat?
Amikor megpróbál futtatni egy sorban TextBox10.Text = Val (TextBox1) * 1,26 * 1,5 * Val (TextBox5) (És úgy tűnik, és az összes többi) kérdések „objektum változó vagy tömb változó nincs beállítva”. Próbáltam használni a kereső, de egyik sem próbált nem oldja
Szia, kérem, segítsen a hiba kijavítására a makrót. Itt a kód:
Run-time error '424': Object szükséges Hello emberek segítenek hibajavítás Run-time error '424': Object szükséges Private Sub makeElementNode (név, ByRef csomópont IXMLDOMElement, ByRef appendNode Ahogy IXMLDOMElement) A node = dom.createElement ( név) appendNod.appendChild nod megkülönbözteti ezt Straka debug End SubDobavleno 29. percében appendNod.appendChild csomópont
Jó napszak! Excel makró egy hiba: Run-time error „424: objektum szükséges
Az alábbi kód 4-es vonal (egy fájl megnyitásakor kiterjesztésű doc) hibaüzenetet kapok „run-time error»424«tárgy szükséges”
Srácok! Hello mindenkinek! A kérdés: a cellában például Cells (1,1) adatokat servaka jönni, amint a szükséges eljárást használ cellájában kiürül (null). De egy idő után van egy hiba alkalmazás által definiált vagy tárgy meghatározott Hiba-és sárga kiemeli ezt a cellát! Mondd, mi a probléma?