Pretvorite negativne vrijednosti tretirane kao tekst pomoću VBA u programu Microsoft Excel

Anonim

U ovom ćemo članku stvoriti prilagođenu funkciju za pretvaranje negativnih nizova u cijeli broj.

Sirovi podaci za ovaj članak sastoje se od nizova iza kojih slijedi znak minus (-).

Ove nizove želimo pretvoriti u cijele brojeve.

Logično objašnjenje

U ovom članku stvorili smo prilagođenu funkciju ConvertNegNumbers za pretvaranje niza u cijeli broj. Ova funkcija uzima vrijednost niza kao ulaz i vraća cijeli broj kao izlaz.

Objašnjenje koda

Desno (Var, 1) = "-"

Gornji kôd koristi se za provjeru je li zadnji znak niza jednak znaku minus (-).

ConvertNegNumbers = CInt (" -" & Lijevo (Var, Len (Var) - 1))

U gornjem kodu, lijeva funkcija koristi se za izdvajanje svih znakova u nizu, osim zadnjeg. Funkcija CInt koristi se za pretvaranje vrijednosti niza u cijeli broj.

Molimo slijedite dolje za kôd

 Opcija Eksplicitna funkcija ConvertNegNumbers (Var As String) 'Provjerava je li zadnji znak u nizu minus (-) If Right (Var, 1) = "-" Then "Pretvaranje vrijednosti niza u negativni cijeli broj ConvertNegNumbers = CInt ("-"& Lijevo (Var, Len (Var) - 1)) Inače 'Pretvaranje vrijednosti niza u cijeli broj ConvertNegNumbers = CInt (Var) End If End Funkcija 

Ako vam se dopao ovaj blog, podijelite ga sa svojim prijateljima na Facebooku. Također, možete nas pratiti na Twitteru i Facebooku.

Voljeli bismo vas čuti, javite nam kako možemo poboljšati svoj rad i učiniti ga boljim za vas. Pišite nam na web stranici e -pošte