Мэдээллийн сандаа импортлохоосоо өмнө "цэвэрлэх" нь нэлээн стандарт байдагtarМэдээллийн санг ашиглах нь тогтоосон шалгуурын талаар та мэдээллийн баазыг урьдчилан таамаглаж мэдэх боломжтой юм ... тийм үү? Жишээлбэл, нэг хүн "$" оруулдаг файлын мэдээллийг импортлох шаардлагатай байхад гадны нөхцөл байдлыг хэрхэн яаж зохицуулах вэ, гэхдээ өөр хүн үүнийг моне байна гэж таамаглаж байнаtary утга - эсвэл үүнээс ч дор, хэн нэгэн нь "am" эсвэл "pm" -д ордог боловч өөр хүн 24 цагийн цаг ашигладаг уу? Ердийн байдлаар асуудалд хандах олон арга зам байдаг боловч нэг арга бол мөр нь зөвхөн тооны багц юмуу эсвэл түүнд "тоон бус" байгаа эсэхийг шалгах явдал юм. Жижиг VBA-тай бол энэ төрлийн чек нь энгийн бөгөөд энэ нийтлэл танд хэр энгийн болохыг харуулах болно ...
Бид яагаад үүнийг хийх хэрэгтэй вэ?
Хэрэв та хэрхэн оруулах, задлах талаархи хяналтгүй ямар нэгэн мэдээллийг импортлож байгаа бол өмнө нь ийм асуудалтай олон удаа (олон!) Удаа таарч байсан - хүмүүс дэлгэрэнгүй мэдээллийг m хэлбэрээр оруулдаг.ost жигд бус, тэдэнд тохь тухтай байдаг. Энэ нь танд цаг хугацаа шаардагдана гэсэн үг юм хийх импортлохоосоо өмнө жигд байна.
Үүний ердийн жишээ бол тоон талбарт өгөгдөл импортлох шаардлагатай боловч өгөгдлийг харахад зарим нь мянга мянган хүнийг таслалаар тусгаарлаж, нөгөө хэсэг нь валютын тэмдэг нэмж оруулсан бөгөөд өөр хэн мэдэх вэ.
Шуурхай анхааруулга!
Мэдээллийн бааздаа цэвэрлээгүй өгөгдлийг импортлох нь ихээхэн сүйрэл дагуулж болзошгүй бөгөөд хамгийн сайн нь таны тайлагналыг гажуудуулж, муугаар нь янз бүрийн зүйл эвдэрч болзошгүй юм. "Бохир" өгөгдлийг импортлох нь таны шалтгаан болж болохгүй хичээж байна хандалтын асуудлыг засах бүх амралтын өдрүүдэд!
Цагаан толгойн үсэгнүүдийг хэрхэн "арилгах" вэ?
Мэдээжийн хэрэг та хайлт хийж, гараар сольж болох боловч үүнийг хийхэд цаг хугацаа шаардагдах бөгөөд та ямар нэг зүйлийг санаж магадгүй (хэрэв та зөвхөн долларын тэмдгийг хайж байгаа бол евро тэмдэг эсвэл таслал, зай гэх мэт зүйлийг санаж магадгүй) . Үүнийг хийх хамгийн хялбар бөгөөд найдвартай арга бол доорх кодыг ашиглан хүнд хэцүү ажлыг Access-д хийх боломжийг олгох явдал юм.
Код руу…
Public Function removeNonNumeric(inString As String) As Long Dim outputString, chrString As String Dim strPos As Integer For strPos = 1 To Len(inString) chrString = Mid(inString, strPos, 1) If IsNumeric(chrString) Then outputString = outputString & chrString Next removeNonNumeric = CLng(outputString) End Function
Код юу хийдэг вэ?
Энд функц нь маш шулуун юм. Бидний хийх зүйл бол дамжуулж буй мөрийг нэг нэг тэмдэгтээр давтах явдал юм. Хэрэв тэмдэгт нь тоо байвал бид үүнийг хэмнэл дээрээ нэмнэrary мөр, тэгээд дууссаны дараа бид үүнийг "урт" болгож хөрвүүлдэг.
Кодыг өөрт тохируулан өөрчлөх
Таны харж байгаагаар функц нь "урт" гэсэн өгөгдлийн төрлийг буцаадаг - хэрэв та бүхэл тоонууд эсвэл хөвөгч цэгүүдтэй ажиллаж байгаа бол функцийг өөрчилж өгөгдлийн санд тохирох зөв утгыг буцааж өгөх хэрэгтэй.
Зохиогчийн танилцуулга:
Митчелл Цөөрөм бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. засвар SQL Server Өгөгдлийн сан болон excel сэргээх програм хангамжийн бүтээгдэхүүнүүд. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com