Excel: Jak sprawdzić, czy komórka jest pusta przy użyciu VBA?

Question

Powiel możliwe:
Using VBA to check if below cell is empty

Jak VBA czekiem jeśli komórka jest pusta od drugiego z konkretnych informacji? przykład: Jeśli A: A = "produkt specjalny" A B: B ma wartość null Następnie C1 = "produkt specjalny" To tylko pomysł.

I jak używać dla każdego na Range. I zwrócić wartość w innej komórce?

Answer 1

This witryna wykorzystuje metodę isEmpty().

Edytuj: treść pobrana z witryny, zanim adres URL będzie nieprawidłowy.

Worksheets("Sheet1").Range("A1").Sort _ 
    key1:=Worksheets("Sheet1").Range("A1") 
Set currentCell = Worksheets("Sheet1").Range("A1") 
Do While Not IsEmpty(currentCell) 
    Set nextCell = currentCell.Offset(1, 0) 
    If nextCell.Value = currentCell.Value Then 
     currentCell.EntireRow.Delete 
    End If 
    Set currentCell = nextCell 
Loop 

W pierwszym kroku sortowane będą dane w pierwszej kolumnie z arkusza1. W drugim kroku wszystkie wiersze z tymi samymi danymi zostaną usunięte.

Answer 2

Można użyć IsEmpty() funkcję tak:

... 
Set rRng = Sheet1.Range("A10") 
If IsEmpty(rRng.Value) Then ... 

Można także użyć następującej:

If ActiveCell.Value = vbNullString Then ... 

Nie jestem programistą VBA, więc nie przeszkadza ?!

nadzieję, że pomoże

Answer 3

IsEmpty() byłby najszybszym sposobem na sprawdzenie tego.

IsNull() wydaje się podobnym rozwiązaniem, ale należy pamiętać, że do komórki należy przypisać wartość Null; nie jest z natury stworzony w komórce.

Ponadto, można sprawdzić przez komórkę:

count()

counta()

Len(range("BCell").Value) = 0