Meriv çawa di Excel VBA de String Veguhezîne Hejmarê (3 Rêbaz)

Hugh West

18-10-2023 Makro & amp; Excel VBA
  • Vê Parve Bikin
Hugh West

Di vê gotarê de, em ê çend awayan nîqaş bikin da ku rêzika li Excel VBA biguhezînin hejmarê. Em ê bibînin ka meriv çawa fonksiyonên çêkirî bikar tîne û fonksiyonek xwerû bi karanîna wan biafirîne da ku bi mînakên koda VBA-yê rêzê veguherîne hejmarê.

Pirtûka Xebatê ya Pratîkê dakêşin

Dema ku hûn vê gotarê dixwînin, vê pirtûka xebatê ya pratîkê dakêşin ku hûn vê gotarê dixwînin.

String Veguhezînin Hejmar.xlsm

3 Rêyên Veguheztina Rêzan Bo Hejmarê di Excel VBA de

1. Bi Bikaranîna Fonksiyonên Veguheztina Tîp String Veguherîne Jimarê

Excel gelek fonksiyonên veguhertina celeb biguherîne peyda dike. Em dikarin wan di koda xweya VBA-yê de bikar bînin da ku bi hêsanî ji cureya daneya rêzikê veguhezînin cûreyên daneya cihê. hejmar , em dikarin di koda xwe de fonksiyona CInt bikar bînin. Fonksiyona CInt tenê argûmanek digire û divê ew nirxek hejmarî be. Werin em koda jêrîn di Edîtorê Koda Dîtbarê de biceribînin. 

1334

Pel bike F5 ji bo xebitîne kod . Derketin di MsgBox de tê nîşandan.

Fonksiyon CINT veguherand rêzika hejmarî nirx ("12.3" ) ji bo hejmarek 12.

Ji bo ku di derbarê fonksiyona CInt de bêtir fêm bikin, jêrîn bikin di edîtorê kodê de kod bikin û li encamê binêrin . 

1531

Derketin li vir eli jêr dîmenê .

Rêvekirina kodê

Di vê kodê de, me Ji bo… Xala paşîn ji bo sepandina fonksiyona Cint li ser rêzikên şaneyan B3:B7. derketin di şaneyên C3:C7 de têne çapkirin. Me fonksiyona Cells bikar anî da ku nirxên têketinê diyar bike û li ku derê nirxên derketinê çap bike.

Encam

Fonksiyon CINT 25.5 veguherandine hejmara paşîn 26 . Ji hêla din ve, wê 10.3 veguherand 10, ne 11 . Dema ku nirxek hejmarî ya dehîkî ji .5 kêmtir be, fonksiyon berbi heman hejmarê vedigere. Lê nirxa rêzika jimarî ya dehanî vediguhere hejmara paşîn heke wek an ji .5-yê mezintir be.

Têbînî

Nirxa yekjimar di navbera -32,768 heta 32,767 de heye. Ger em nirxek hejmarî ku ji vê rêzê ye deynin, Excel dê çewtiyek nîşan bide.

1.2 String bo Long

Fonksiyon CLng nirxek rêza hejmarî vediguherîne cure daneya dirêj . Ew bi fonksiyona CINT re bi heman rengî dixebite. Cûdahiya sereke di rangeya wê de ye ku di navbera -2,147,483,648 û 2,147,483,647 de ye. 

The code to run is here below:6720

Li vir, şaneyên B3:B9 hin nirxa rêza hejmarî , û guhertin l hejmarên ong di şaneyan de ne. 3>C3:C9. Fonksiyon CLng guhert -32800 û 32800 bi serkeftin hejmarên dirêj ku fonksiyona CInt nekarî. Lê ew ê di heman demê de çewtiyek jî derkeve heke têketina nirxa hejmarî ji rêzê be.

1.3 String berbi Dehanî

Bi karanîna fonksiyona CDec em dikarin veguherînin a nirxa rêzika jimareyî ji bo cureya daneya dehiyê. koda jêrîn bixebitîne da ku nirxên hejmarî di şaneyên B3:B7 de biguherîne cureya daneya dehiyê. 

1352

1.4 String to Single

Di vê nimûneyê de, em ê rêzikên têketinê veguherînin cure daneya yekane (yek -hejmarên hêlînê yên rast. Ji bo vê yekê, pêdivî ye ku em fonksiyona CSng bikar bînin .

Tîpa daneya yekane rêze- (i)  -3.402823E38 heta -1.401298E-45 ji bo hejmarên negatîf

(ii) 1.401298E-45 2298E-45 <3. hejmarên erênî.

Koda jêrîn di edîtora bingehîn ya dîtbarî de bixebitîne. 

9649

Di encam de, şaneyên B3:B9 hinek nirxa rêza jimareyî vedihewîne, û hejmarên yek tîpî yên veguherî di şaneyan de hene C3:C9. Lê ew ê jî çewtiyek bibîne eger ketina nirxa hejmarî ji rêzê be.

1.5 Xalê ducar dibe

Di vê nimûneyê de, em ê rêzikên têketinê veguherînin cureya daneya ducar (dot-rastiya floating -xal) jimare. Ji bo vê em hewce neji bo bikaranîna fonksîyona CDbl .

Tîpa daneya ducar diguhere- (i) -1.79769313486231E308 heta -4.94065645841247E-324 ji bo neyînî hejmar.

(ii) 4.94065645841247 4.94065645841247 4.94065645841247 4.94065645841247 4.94065645841247 4.94065645841247 4.94065645841247. .

Koda jêrîn di edîtora bingehîn ya dîtbarî de bixebitîne. 

9829

Di encam de, şaneyên B3:B9 hinek hene nirxa rêza hejmarî û hejmarên du tîpên daneyê yên hatine guherandin di hucreyan de hene C3:C9. Lê ew ê di heman demê de çewtiyek jî derkeve ger têketina 3>nirxa hejmarî ji rêzê ye.

1.6 String to Peru

Cûreya daneya pereyê dema ku hesab bi pere ve girêdayî be bikêr e. Wekî din, heke em di sabît – xala hesab de rastbûna bêtir dixwazin, karanîna celebê daneya diravê bijarek baş e. Pêdivî ye ku em fonksiyona CCur bikar bînin da ku rêzek biguherînin cure daneya pereyê . Cureya daneyê ji ji -922,337,203,685,477.5808 heya 922,337,203,685,477.5808.

Kodê heya veguhertina nirxê numer 4> ji şaneyên B3:B7 heta cureyê daneya pereyê di şaneyên C3:C7 de li jêr e. 

1144

1.7 String bo Byte

Fonksiyon CByte nirxên rêza hejmarî vediguherîne cureya daneya byte ku ji diguhere. 0 heta 255.

Kod wek ejêre : 

3941

Di encam de, şaneyên B3:B9 hin nirxa rêzika jimareyî heye, û hejmarên cureyê daneya baytê hatine guherandin di şaneyan de hene C3:C9. Lê ew ê di heman demê de çewtiyek jî derkeve eger ketina nirxa hejmarî ji rêzê be.

Zêdetir bixwînin: Meriv Meriv Di Excel VBA-yê de Bi karanîna VBA-yê String Veguhezîne Dirêj

Xwendinên Bi heman rengî

  • Di Excel VBA-yê de Stringê Ducar Biguherîne (5 Rêbaz)
  • Meriv çawa bi Excel VBA re nivîsê vediguhezîne hejmarê (3 Mînak bi makroyan)
  • Çewtiya Veguhertina Hejmarê di Excel de rast bike (6 Rêbaz)
  • Meriv çawa Nîşana Zanistî Veguhezîne Hejmarê li Excel (7 Rêbaz)

2. Bikaranîna Fonksiyona VBA ya Xweser ji bo Kontrolkirin û Veguheztina String bo Hejmarê li Excel

Di vê nîgarê de, em ê fonksiyona xwerû ji bo veguheztinê çêbikin. rêzikên ji bo hejmaran. Dûv re em dikarin vê fonksiyona xwerû di karxebata xwe de wekî fonksiyona çêkirî bi kar bînin. Di vê nimûneyê de, em ê fonksiyona CIint bikar bînin da ku biguherînin rêzan bo hejmaran dema ku fonksiyona xwerû biafirînin. Herwiha em dikarin hemî fonksiyonên din yên ku di rêbaza 1 de hatine diyar kirin bikar bînin da ku strên veguherînin cureyên daneya cihê . Niha, gavên jêrîn bişopînin da ku vê yekê pêk bînin.

Gavên:

  • Li vir, di şaneyên B3:B7, de em hinek hene rêzika jimareyînirxên paşê Ctrl + S bikirtînin da ku hilîne 
9713
  • Di hucreyê de C3 , dest bi nivîsandina navê fonksiyonê ( StringToNumber ). Excel dê xweber fonksiyona a bikar bîne pêşniyar dike. Bişkojka Bişkojka Tab bikeve fonksiyonê.

  • referansa hucreyê B3 bixin wekî argumana tenê.

  • Niha, pêl Enter bike piştî girtina parantezê.

  • Cîhê Dîgira Dagirtin li goşeya binê rastê ya hucreyê C3 ji bo sepandinê Fonksiyon ji bo şaneyan C4:C7.

  • Derketina dawîn jimareyên bêkêmasî yên xwestî yên ji nirxên rêzikê ne. .

3. Koda VBA-yê ji bo Veguheztina Rêzeya Hilbijartî ya Hucreyan berbi Hejmaran di Excel de

Di vê nîgarê de, em ê rêjeyek ji şaneyên hilbijartî veguherînin. ji bo jimareyên bêkêmasî nirxên rêzê vedihewîne. Ger şaneyek nirxek ne-hejmar tê de hebe, wê encam bibe xêzik (-) li şûna wê . gavên bişopînin:

  • Haneyên Hilbijêre B3:B6 rêzikên hejmarî nirx û B7 yên ku tê de hene nehejmarek

  • Di Edîtorê Visual Basic de kopî û pêç bikin ya jêrîn kod . 
3972
  • Niha, F5 bikirtînin da ku xebitin derketinê wekî ku tê nîşandan jêrîn screenshot .

Têbînî

  • Me bikar anî Fonksiyona jimareyî ye di rêbaza 2mîn û 3emîn ê de di koda meya VBAyê de ku kontrol dike ka bêjeyek dikare bibe jimarek an na.
  • Di rêbaza 1 , me fonksiyonên çêkirî (CInt, CDbl, CSng…..) bikar anîn da ku nirxên rêza hejmarî biguherînin bo hejmaran . Lê eger nirxeke ne-hejmar hebe, ew ê çewtiyeke nelihevkirinê nîşan bide.

Encam

Naha, em dizanin ka meriv çawa di Excel de nirxên rêzikê bi jimareyan veguherîne. Hêvîdarim, ew ê we teşwîq bike ku hûn vê fonksiyonê bi ewletir bikar bînin. Pirs an pêşniyarek ji bîr neke ku wan di qutiya şîroveyê ya jêrîn de bihêle.

Posta berê Mînaka VLOOKUP-ê bi şerta IF-ê ya Pirjimar li Excel (9 Pîvan)
Posta paşîn Meriv çawa hucreyê li ser bingeha Formula di Excel de Format dike (13 Nimûne)

Hugh West perwerdekar û analîstek Excel-ê pir bi tecrûbe ye ku di pîşesaziyê de zêdetirî 10 salan ezmûn heye. Di warê Hesabgiranî û Darayî de bawernameya Bachelorê û di Rêveberiya Karsaziyê de jî Master e. Hugh ji hînkirinê re dilşewat e û rêgezek hînkirinê ya bêhempa pêşxistiye ku hêsan tê şopandin û têgihiştin. Zanîna wî ya pispor a Excel alîkariya bi hezaran xwendekar û pisporan li çaraliyê cîhanê kiriye ku jêhatîbûnên xwe baştir bikin û di kariyera xwe de pêşde bibin. Bi bloga xwe, Hugh zanîna xwe bi cîhanê re parve dike, dersên belaş Excel û perwerdehiya serhêl pêşkêşî dike da ku alîkariya kes û karsaziyan bike ku bigihîjin potansiyela xwe ya tevahî.