[kiepski_nick]

Piszę makro, które w pewnym momencie ma zamienić / na początku liczby na nic. Jeżeli robie to crt+h wszystko dziala dobrze, jednak jeżeli to robie w makrze to usuwa też przecinki. Oto przykład;
w komórce jest wartość /4,37200 i crl h zamienia to na 4,372 co jest jak najbardziej ok, jednak makro zamienia to na 437200. Oto przykładowy kod, jednak nie ważne czy używam zmiennych czy nie. Spotkał się ktoś kiedys z czymś podobnym albo ma pomysł jak to obejść?
Dim fnd As Variant
Dim rplc As Variant

fnd = "/"
rplc = ""
Range("O11").Select
Selection.Replace what:=fnd, Replacement:=rplc,
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False,
SearchFormat:=True, ReplaceFormat:=False

#vba #excel

[bianco86]

@kiepski_nick a dlaczego nie przypiszesz poprostu wartości komórki do zmiennej, użyjesz funkcji vba Replace i wpiszesz wartość zmiennej spowrotem do komórki?

[Limonene]

@kiepski_nick: coś takiego nie wystarczy?

Cells.Replace What:="/", Replacement:="", LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False

[croppz]

@kiepski_nick: czysty strzał, ale spróbuj najpierw zmienić przecinki na kropki

[kiepski_nick]

@bianco86: Tylko tych komórek jest kilkaset w dwóch kolumnach, to nie wiem czy ten sposób zda egzamin i chyba nie bardzo rozumiem. Jeżeli przypiszę wartość do zmiennej uzyje find and replace i spowrotem dam wartość ze znakiem /?
@Limonene: nie ma znaczenia czy używam zmiennych czy nie
@croppz: dzięki wielkie ten sposób zadziałał :D

[kiepski_nick]

@croppz: Excel zamienia to wtedy na przecinek więc wartość to 4,372, chociaż nie mam pojęcia dlaczego excel tak działa

[Limonene]

nie ma znaczenia czy używam zmiennych czy nie

@kiepski_nick: a próbowałeś mojego makra czy tylko tak sobie mówisz, że nie zadziała? :P Skoro przy crtl+h jest OK, to przy tym makrze też będzie.

[brak_nicku]

@kiepski_nick: to jest bardzo ciekawe. To wygląda na błąd w API.
@Limonene: nie, nie działa.

[croppz]

@kiepski_nick: stara sprawa. Excel w funkcjach arkusza jako separatora dziesiętnego używa przecinków (bo jesteśmy w Polsce), VBA twardo oczekuje kropek.

[Limonene]

@brak_nicku: u mnie działa, sprawdzone na dwóch kompach. Zresztą nie do ciebie to pytanie ;)

[brak_nicku]

@Limonene: to zapewne zależy od a) wersji Excela, b) ustawień regionalnych.

[kiepski_nick]

@Limonene: może działa u Ciebie bo masz ustawione inne separatory?

[ShortyLookMean]

@kiepski_nick: a po co to robić VBA, jak jest Power Query?

[brak_nicku]

@ShortyLookMean: dawno nie próbowałem PQ ale swego czasu miało jedną, ale zasadniczą wadę - koszmarna wydajność.