po polsku
Strona: [ > ] z 1
Autor
Temat: Jak zrobic makro konwertujace na liczby
anonim
Typ:
Nie zarejestrowany
Jak zrobic makro konwertujace na liczby
Mam pytanko jak zrobiæ makro które by uruchamia³o sie konwertowa³o komórki tekstowe na liczbowe np w zakresie A120 jak wpisze 12,25 to ¿eby traktowa³o mi to jako liczbê a nie jako tekst bo po wpisaniu z userforma nawet z przecinkiem arkusz widzi to jako text
18-05-2005 14:53
wild
Typ:
neutral
Postów: 1
Zarejestrowany: Apr 2005
Jezeli przed zapisaniem z userforma zamienisz sobie tekst na liczbe to bedzie ok
Liczba = Val(Tekst)
pozdrawiam darek
_____________________________________________
daras
18-05-2005 17:28
losmac
"profesorek"
Typ:
neutral
Postów: 758
Zarejestrowany: May 2003
Mo¿esz te¿ sformatowaæ komórki:
ThisWorkbook.Worksheets(1).Range("A1:A20".NumberFormat = "0.00"
I jeszcze lepiej by³oby, gdyby¶ wykorzysta³ rzutowanie typów, tylko nie w sposób jaki poda³ Ci wild, a wraz z obs³ug± b³êdów:
ThisWorkbook.Worksheets(1).Range("A1" = CDbl(Me.TextBox1)
Spowoduje to, ¿e u¿ytkownik bêdzie zmuszony wpisaæ tylko poprawny format liczbowy. Val() niestety obcina pewne czê¶ci i przy zapisie:
12345cnsdj123
w komórce zobaczysz tylko
12345
St±d wniosek, by uzywaæ CDbl() do konwersji, rzutowania typu liczbowego.
CDbl() wyrzuci Ci b³±d, ¿e nie mo¿e dokonaæ konwersji takiej liczby (1345cnsdj123) i maj±c przygotowany podprogram obs³ugi b³êdów zmusisz u¿ytkownika do podania w³a¶æiwej warto¶ci liczbowej.
_____________________________________________
POSTULATY STARUSZKA:
1) Ludzie, dbajcie o polszczyznê!!!
2) Ludzie, zadawajcie kompletne pytania, a nie rzucacie och³apy i trzeba siê domy¶laæ o co chodzi!!!
Powodzenia
Maciej £o¶
18-05-2005 18:06
Wszystkich odpowiedzi: 2 ::
Maxymalnie na stronê: 20
Strona: [ > ] z 1
zanotowane.pldoc.pisz.plpdf.pisz.plpajaa1981.pev.pl