Excel - vybrat buňky s hypertextovým odkazem

pikaso.andreas · Příspěvekod **pikaso.andreas** » 05 pro 2021 21:27

Ahoj, mám excel soubor, kde mám jeden sloupec a mnoho řádků, ale potřebuji vybrat či vyfiltrovat jen buňky které jsou HTTP, jako odkazy na web. Ostatní buňky kde je jen text potřebuji odstranit. Procházím návody ale asi nevím jak se zeptat strýčka googla.

Děkuji
Ondra

Reklama

elninoslov · Příspěvekod **elninoslov** » 06 pro 2021 17:57

Asi jedine makrom:

Kód: Vybrat vše

Sub Cudlicek()
Dim Oblast As Range, Bunka As Range, Zmaz As Range, Riadkov As Long
    With ThisWorkbook.Worksheets("Hárok1")
        Riadkov = .Cells(Rows.Count, "A").End(xlUp).Row - 1
        Set Oblast = .Cells(2, "A").Resize(Riadkov)
        For Each Bunka In Oblast.Cells
            If Bunka.Hyperlinks.Count = 0 Then
                If Zmaz Is Nothing Then Set Zmaz = Bunka Else Set Zmaz = Union(Zmaz, Bunka)
            End If
        Next Bunka
    End With
    If Not Zmaz Is Nothing Then Zmaz.Delete Shift:=xlUp
End Sub

pikaso.andreas · Příspěvekod **pikaso.andreas** » 07 pro 2021 11:59

Děkuji moc. Na první dobrou super. Skvělé. Klaním se.

Excel - vybrat buňky s hypertextovým odkazem Vyřešeno

Excel - vybrat buňky s hypertextovým odkazem

Re: Excel - vybrat buňky s hypertextovým odkazem Vyřešeno

Re: Excel - vybrat buňky s hypertextovým odkazem

Kdo je online