Excelدا vbaدىن جىددىي ياردەم سورايمەن، ئۇستازلار يول كۆرسەتسەڭلار [ئۇلانما كۆچۈرۈش]

باشقۇرۇش ئەسكەرتمىسى: باشقۇرغۇچى Kulke بۇ تېمىنى تەستىقلىغان ۋاقتى 2017-4-8 16:00

Sub 替换数据()
Worksheets("Sheet1").Columns("A").Replace _
What:="北区", Replacement:="北关区", _
SearchOrder:=xlByColumns, MatchCase:=True
End Sub

مەزمۇننى كۆچۈرۈۋېلىش

يۇقارقى vbaبۇيرۇقىنى بەيدۇدىن ئىزدەپ تاپقان ئىدىم  ئىكىسئېلدا ئالماشتۇرۇش ئۈچۈن. بۇ بۇيرۇقنى داۋاملاشتۇرالمىدىم،  مۇشۇ بىر قۇرلا ئىشلەيدۇ،  what دىگەن قۇرنى كۆچۈرسەم ئىشلىمىدى.
سورايدىغىنىم:
1- مۇشۇ بۇيرۇقنى داۋاملاشتۇرۇشنى كۆرسىتىپ قويغان بولساڭلار، نەچچە يۈز قۇر ئەتراپىدا.
2- ئالماشقاندىن كېيىنكى قىممەتنى ئۇيغۇرچە يازماقچى ئىدىم مەسىلەن 北区=شىمالى قوۋۇق رايونى دىگەندەك.  vba كود تەھرىرلەش كۆزنىكىگە قانداق قىلغاندا بىۋاستە ئۇيغۇرچە يازغىلى بولىدۇ؟

whatقۇرنى كۆچۈرۈپ داۋاملاشتۇرسام خاتالىق چىقىۋالدى.  vbaدا كود تەھرىرلەش كۆزنىكىگە ئۇيغۇرچە يازسام ؟؟؟؟؟؟؟ سوراق بەلگىسى چىقىۋالدى.

ئۇستازلارنىڭ ياردەم قىلىشىنى ئۈمىد قىلىمەن.  ھەقلىق بولسىمۇ بولىدۇ.
مۇمكىن بولسا مۇشۇ كودنى Excelغا ئەكىرىپ، بۇيرۇقنى بىر نەچچە قۇر كۆپەيتىپ، ئالماشتۇرماقچى بولغان خەتنى ئۇيغۇرچە يېزىپ ئەۋەتىپ بەرسەڭلار مۇۋاپىق ھەق بىرەتتىم.
بەك جىددىي لازىم ئىدى، باشقۇرغۇچىلارنىڭ تەستىقلاپ قويۇشىنى ۋە ئۇستازلارنىڭ ياردەم قىلىشىنى تۆۋەنچىلىك بىلەن سورايمەن.
vba توغىرسىدىكى ئۇيغۇرلار قۇرغان QQتوپ بولسا نومۇرىنى يوللاپ بەرسەڭلارمۇ خۇش بولاتتىم.

sewdaye

[ تېخى يورۇمىدى: تەجرىبە ] تەلىپى: 200 [ تېخى يورۇمىدى: شۆھرەت ] تەلىپى: 180 [ تېخى يورۇمىدى: نادىر تېما ] تەلىپى: 5 [ تېخى يورۇمىدى: تەڭگە ] تەلىپى: 100 [ تېخى يورۇمىدى: تېما سانى ] تەلىپى: 50 [ تېخى يورۇمىدى: توردىكى ۋاقت ] تەلىپى: 48 [ تېخى يورۇمىدى: ئومۇمىي يازما ] تەلىپى: 50 [؟]

Rank:1

تەجرىبە: 9
شۆھرەت: 3
تەڭگە: 0

ھەمبەھر0 ساقلاش0 قوللايمەن0 قارشى0

1-قەۋەت

‎2017-4-8 16:20:14 يوللىغان ۋاقتى

خەت چوڭلۇقى : چوڭ ئوتتۇرا كىچىك

ئەتتىگەندىن بىرى ھەپىلىشىپ، كودنى داۋاملاشتۇرالىدىم، ئەمدىكى مەسىلە vbaغا ئۇيغۇرچە كىرگۈزۈش بوپ قالدى. كىشى ئىسىملىرىنى تەرجىمە قىلغاندەك ھەرىپ بويىچە بولمىسىمۇ بولاتتى. مەن سۆز بىرىكمىسىنىڭ خەنزۇچە ئۇيغۇرچىسىنى كىرگۈزسەم Excelدا بار بولسا ئالماشسىلا بولاتتى، پىنيىنچە كىرگۈزسەم بولدى، لىكىن ئۇيغۇرچە كىرگۈزسەم سوراق بەلگىسى چىقىۋالدى، ھەممە كىرگۈزگۈچنى ئىشلىتىپ باقتىم.
vbaغا ئۇيغۇرچە خەت يېزىشتىن يول كۆرسەتسەڭلار بولاتتى. بۇرۇن بۇنى قىلىپ باقمىغاچقا پەقەتلا ئۇيغۇرچە كىرگۈزەلمىدىم. ياردەم قىلساڭلار، رەھمەت

sewdaye

Rank:1

تەجرىبە: 9
شۆھرەت: 3
تەڭگە: 0

2-قەۋەت

‎2017-4-8 16:21:41 يوللىغان ۋاقتى

خەت چوڭلۇقى : چوڭ ئوتتۇرا كىچىك

مۇشۇ ئۈچ قۇرنى بىللە كۆچۈرسە داۋاملاشتۇرغىلى بولىدىكەن
Worksheets("Sheet1").Columns("A").Replace _
What:="北区", Replacement:="北关区", _
SearchOrder:=xlByColumns, MatchCase:=True

sewdaye

Rank:1

تەجرىبە: 9
شۆھرەت: 3
تەڭگە: 0

3-قەۋەت

‎2017-4-8 21:05:01 يوللىغان ۋاقتى

خەت چوڭلۇقى : چوڭ ئوتتۇرا كىچىك

ئاخىرى قۇتيار QQتوپىدىكى smartناملىق ئۇستازنىڭ ياردىمى بىلەن بۇ مەسىلىنىمۇ ھەل قىلدىم. مۇنبەر يۈزىدە بۇ ئۇستازغا رەھمەت ئېيتىمەن.
باشقا بىر كود ئارقىلىق بۇ قىيىنچىلىقىمنى ھەل قىلىپ بەردى.

sewdaye

Rank:1

تەجرىبە: 9
شۆھرەت: 3
تەڭگە: 0

5-قەۋەت

‎2017-4-9 19:51:22 يوللىغان ۋاقتى

خەت چوڭلۇقى : چوڭ ئوتتۇرا كىچىك

[ تەجرىبە 2 _ دەرىجە ] ≥ 400 [ تېخى يورۇمىدى: شۆھرەت ] تەلىپى: 180 [ تېخى يورۇمىدى: نادىر تېما ] تەلىپى: 5 [ تېخى يورۇمىدى: تەڭگە ] تەلىپى: 100 [ تېخى يورۇمىدى: تېما سانى ] تەلىپى: 50 [ تېخى يورۇمىدى: توردىكى ۋاقت ] تەلىپى: 48 [ ئومۇمىي يازما 1 _ دەرىجە ] ≥ 50 [؟]

تىشلىقمۇ، مەنمۇ ئېكىس ئېل ۋە ۋوردىكى مۇشۇنداق كود يازدىغان يەرلەرنى ئۆگۈنەي دېگەن لىكىن ئۆگۈنىشنى قەيەردىن باشلاشنىى بىلمىدىم، مۇمىكىن بولسا ئالاقىلىشىش نومۇرىڭىزنى قالدۇرغان بولسىڭىز، مېنڭ چ چ 545197272

jam

ئىشەنچىلىك ئەزا

Rank:6

تەجرىبە: 522
شۆھرەت: 140
تەڭگە: 16