Ich kann nicht überprüfen, ob ein importierter Wert von SQL nach Excel Null ist. Im Debug-Modus kann ich feststellen, dass der zugewiesene Wert Null ist, d. H. Nicht die Zeichenfolge "Null". Habe versucht ist nichts wie in meinem Codebeispiel, sondern auch isEmpty und = "Null".Überprüfen, ob das Objekt Null in Excel ist VBA
Es ist die Zeile Wenn dbList (2) Nichts ist dann in dem Code unten, dass ich Probleme mit habe.
Wie kann ich überprüfen, ob das Recordset Null ist?
...
Dim CmdSP As New ADODB.Command
CmdSP.CommandType = adCmdText
CmdSP.CommandText = "SELECT FundName, FundId, SRL.Comment FROM XXX SRL ON XXX = XXX ORDER BY FundName ASC"
CmdSP.ActiveConnection = dbConn
Dim dbList As ADODB.Recordset
Set dbList = CmdSP.Execute
Dim row As Integer
row = 1
While Not dbList.EOF
DataStorage.Range("dsFundsTopLeft")(row, 2) = dbList(0)
DataStorage.Range("dsFundsTopLeft")(row, 3) = dbList(1)
If dbList(2) Is Nothing Then
DataStorage.Range("dsFundsTopLeft")(row, 4) = "No rating"
Else
DataStorage.Range("dsFundsTopLeft")(row, 4) = dbList(2)
End If
dbList.MoveNext
row = row + 1
Wend
...
Vor 'Wenn DBListe (2) Nichts ist ein' Debug.Print Type-Name (DBListe (2)) 'Then' zu setzen - was ist der Ausgang? –