Results 1 to 2 of 2
Thread: Êèðèëèçàöèÿ - Excel
Hybrid View
-
13th December 2010 16:21 #1Registered User
Join Date: Jul:2010
Location: Sofia
Posts: 22
Êèðèëèçàöèÿ - Excel
Çäðàâåéòå. Èìàì åäíà áàçà îò îêîëî 10 000 îáåêòà, åêñïîðòíàòà â xlsx, â êîÿòî èìàì ïîëå, ñúäúðæàùî ñòðèíãîâå, íà ëàòèíèöà. Ñåãà èñêàì òîâà ïîëå, ïî íÿêàêúâ íà÷èí äà ñòàíå íà êèðèëèöà. Òîâà, êîåòî ìè èäâà íà óì å äà replace-íà ïúðâî êîìáèíàöèèòå îò ëàòèíèöàòà (íàïð. ch ñ ÷), ñëåä òîâà îòäåëíèòå ñèìâîëè (íàïð. v ñ â), ìà íÿêàêñè íå ìè ñå çàíèìàâà ñ öÿëàòà àçáóêà!
Íÿêîé çíàå ëè äàëè ñúùåñòâóâà add in èëè äà å ïîïàäàë íà ìàêðîñ, êîéòî ìîæå äà ìè ãî ñâúðøè òîâà??
-
13th December 2010 21:52 #2
Òÿ àçáóêàòà íå å êîé-çíàå êîëêî ãîëÿìà. Äîêàòî ñú÷èíèø ïîñòà ùåøå äà ñè ñâúðøèë ðàáîòàòà (ïðåäïîëàãàì âå÷å òî÷íî òîâà ñè íàïðàâèë).
Àêî ðàáîòàòà íÿìà äà å åäíîêðàòíà, ïúðâèÿ ïúò çàïèñâàø çàìåíèòå â ìàêðîñ è äåéñòâàø. Íåùî îò ñîðòà:
Òàêà èëè èíà÷å, ïðåäïîëàãàì ùå ïîëó÷èø ìíîãî ñòðàííè (íåèçïîëçâàåìè) ðåçóëòàòè.Code:Sub Macro1() ' ' Macro1 Macro ' ' Cells.Replace What:="ch", Replacement:="÷", LookAt:=xlPart, SearchOrder _ :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False Cells.Replace What:="a", Replacement:="à", LookAt:=xlPart, SearchOrder _ :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False Cells.Replace What:="b", Replacement:="á", LookAt:=xlPart, SearchOrder _ :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False Cells.Replace What:="v", Replacement:="â", LookAt:=xlPart, SearchOrder _ :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False End Sub
À è êàòî èñêàø ïîìîù, íå êàçâàé "íå ìè ñå çàíèìàâà", à ïèìåðíî "íå çíàì êàê" èëè "íå óñïÿâàì". Ùåøå äà ïîëó÷èø ïî-ïîëåçíè îò ìîÿ îòãîâîð.
GIGABYTE 890GPA-UD3H | AMD Phenom II X4 925 2.8GHz / CM HYPER TX3 | 2 x 2GB SUPER TALENT DDR III 1333 CL9 | Sapphire HD5770 Vapor-X 1GB GDDR5 | WD 500GB SATA II Black | CM GX 650W | LG W2361V-PF, 23", 1920x1080 | Windows 7 Ultimate x64




Reply With Quote
Ïðåïîðú÷àéòå ìÿñòî çà ïî÷èâêà â...
7th May 2023, 14:24 in Îáùè ïðèêàçêè