Domanda

Devo migrare il documento da MS Excel per aprire l'ufficio con macro.Tutto funziona bene tranne questa funzione

 If Application.WorksheetFunction.IsNumber(Cells(12, 5)) = False Then
   MsgBox "Nesprávne zadané číslo účtu alebo kód banky!", vbCritical
   ActiveSheet.Protect Password:="****", DrawingObjects:=True, Contents:=True, Scenarios:=True
   Exit Sub
 End If
.

È il controllo dei valori inseriti dall'utente.Ma ottengo solo questo errore:

Errore di runtime di base La variabile di oggetto non è impostata

Quindi ho ricontrollato il mio documento, se la cella E12 non è vuota, ma è stata riempita. C'è in Open Office un modo diverso per controllare il formato di input? Grazie

È stato utile?

Soluzione

Il numero in Excel Visual Basic è diverso come in OO.Prova a utilizzare GETCELLYNAME ("E12"). Valore Questa funzione restituisce il numero

Altri suggerimenti

Se la linea If Application.WorksheetFunction.IsNumber(Cells(12, 5)) = False Then non riesce a dire object not set e hai verificato che Cells(12, 5) restituisca un valore, quindi le uniche possibilità che riescono a pensare sarebbero che Application o Application.WorksheetFunction è Nothing.

Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow
scroll top