Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailemVyřešeno Excel - VBA - jak ošetřit # v makru

Dobrý den.
Prosím o pomoc s následujícím skriptem.

Při zpracování tabulky končí některé řádky hodnotou #NENÍ_K_DISPOZICI v buňce. Já potřebuji tyto řádky makrem vyhledat a vymazat. Sloupec s chybovou hodnotou buňky #NENÍ_K_DISPOZICI vložím do jiného jako hodnotu a tím dostanu v buňce místo chyby #NENÍ_K_DISPOZICI text #NENÍ_K_DISPOZICI.

Problém je v tom, že # je náhradní znak pro numeriku a když chci obsah buňky otestovat, tak test končí chybou "type mismatch".

Je možné v testu nějak význam znaku # potlačit aby skript fungoval?

Sub maz_nenalezene()
     ActiveCell.Range("A1:A1").Select
    Selection.EntireRow.Delete
    ActiveCell.Select
End Sub

Sub Vymaz_nenalezene()
    ActiveCell.SpecialCells(xlLastCell).Select
    Selection.End(xlToLeft).Select
    Selection.End(xlUp).Select
    ActiveCell.Offset(1, 0).Range("A1").Select
    posledni = ActiveCell.Row - 1
    Range("E2").Select
    For beh = 1 To posledni
        If ActiveCell.Value = "#NENÍ_K_DISPOZICI" Then
          maz_nenalezene
        Else
          ActiveCell.Offset(1, 0).Range("A1").Select
        End If
    Next
End Sub

Odpověď na otázku

1 Zadajte svou přezdívku:
2 Napište svou odpověď:
3 Pokud chcete dostat ban, zadejte libovolný text:

Zpět do poradny