Hm, za iskanje na način, da ignorira presledke, lahko uporabiš makro:
Sub Najdi()
Dim ws As Worksheet
Dim cell As Range
Dim searchValue As String
Dim cellValue As String
Dim found As Boolean
' Nastavite delovni list
Set ws = ThisWorkbook.Sheets("List1")
' Vnesite številko, ki jo želite poiskati
searchValue = InputBox("Vnesite številko za iskanje:")
' Odstranite presledke iz iskalne vrednosti
searchValue = Replace(searchValue, " ", "")
found = False
' Preiščite celice v delovnem listu
For Each cell In ws.UsedRange
' Odstranite presledke iz vrednosti celice
cellValue = Replace(cell.Value, " ", "")
If InStr(cellValue, searchValue) > 0 Then
cell.Select
MsgBox "Številka najdena v celici " & cell.Address
found = True
Exit For
End If
Next cell
If Not found Then
MsgBox "Številka ni bila najdena."
End If
End Sub
Ne vem, koliko si domač z makri, če malo pogooglaš ne bi smela biti težava. Tega sem preveril v Excelu in celico najde. V kodi makra, kjer piše ("List1"), moraš zapisati točno ime lista, kjer iščeš.
Lahko bi rekli, da Mirella vsakič vstane kot Feniks iz pepela. Ampak tak pač je folk, se zadovolji s to plastik-fantastik robo, vredno 3 €, je pripravljen se gužvat v tistem po plastiki in prepotenem polnem prostoru za prišparat kaj? Nič.
Včasih je boljša računica, da kupiš model z osnovno opremo, ga nadgradiš in prodaš snete dele. Ker so skoki v € kar veliki, ko greš proti boljši opremi serijsko vgrajeni.
Ta kratek filmček je posnel naš član mtb grupe (cikloergometer) pred leti, ko so uvedli ZON - zakon o prepovedi vožnje s kolesi v naravnem okolju. Vredno ogleda!
Spletna stran uporablja piškotke z namenom zagotavljanja funkcionalnosti in boljše uporabniške izkušnje spletnega mesta. Z uporabo spletnega mesta soglašate z uporabo piškotkov.
Napisano
Kot razumem @Slivka, želi obdržati zapise s presledki, samo ko jih piše v iskalno polje jih raje preskoči.
Povezava za deljenje
Deli na druge strani