Note: The other languages of the website are Google-translated. Back to English

Ինչպե՞ս փոխել ուղիղ գնանշումները բառի մեջ գանգուր գնանշումների:

Սովորաբար Microsoft Word- ը ավտոմատ կերպով փոխելու է ուղիղ գնանշումները գանգուր (խելացի օրթիպոգրաֆի) մեջբերումներին ինչպես եք մուտքագրում: Բայց եթե գործառույթն անջատված է, և՛ մեկ, և՛ կրկնակի չակերտները կարող են ուղիղ հայտնվել ձեր փաստաթղթում: Ահա խորհուրդներ ՝ Word- ում ուղիղ գները գանգուր գնի փոխարեն և հակառակը փոխելու համար:

Չանգը ուղիղ մեջբերում է գանգուր գնանշումներին Գտիր և փոխարինիր

Փոխեք ուղիղ գները VBA- ի հետ գանգուր գնի


նետ կապույտ աջ պղպջակ Փոխեք ուղիղ գնանշումները գանգուր գնի մեջ «Գտիր և փոխարինիր» -ով

տաք
Amazարմանալի! Օգտագործեք արդյունավետ ներդիրներ Word- ում (Office), ինչպիսիք են Chrome- ը, Firefox- ը և New Internet Explorer- ը:

Կարդալ ավելին Անվճար ներբեռնում

Նախքան դիմելը Գտնել եւ փոխարինել, դուք պետք է գնաք Ավտոմատ շտկելու ընտրանքներ ապանշել «Ուղիղ գնանշումներ» ՝ «խելացի մեջբերումներով» վանդակում:

Word- ում 2003 թ. Ավտոմատ շտկելու ընտրանքներ տակ է Գործիք բար Իսկ Word 2007-ում `դիմելով Ավտոմատ շտկելու ընտրանքներ սեղմելով  > Ընտրանքներ > Ջրամեկուսացման > Ավտոմատ շտկելու ընտրանքներ, Օրինակ ՝ մենք վերցնում ենք Word 2010/2013 – ը.

Քայլ 1. Սեղմել  > Տարբերակ > Ջրամեկուսացման > Ավտոմատ շտկելու ընտրանքներ > Ավտոմատ ձևաչափելիս մուտքագրելիսեւ ընտրեք «Ուղիղ գնանշումները» ՝ «խելացի գնանշումներով» վանդակը: Տեսեք սքրինշոթը

Քայլ 2. Սեղմել Գլխավոր > Փոխարինել է Editing խմբավորել կամ սեղմել Ctrl + H Ցուցադրել Գտնել եւ փոխարինել երկխոսություն և մուտքագրեք 'or '' in Գտեք ինչ տուփը և մուտքագրեք ' or ''in Փոխարինել տուփ Տեսեք,

Քայլ 3. Սեղմել Փոխարինեք բոլորը.

Նշում: եթե ցանկանում եք բոլոր գանգուր գները փոխարինել ուղիղ գնանշումներով, խնդրում ենք պարզաբանել «Ուղիղ գնանշումներ» ՝ «խելացի մեջբերումներով» վանդակում):


նետ կապույտ աջ պղպջակ Փոխեք ուղիղ գները VBA- ի հետ գանգուր գնի

Word 2010-ի բոլոր ուղիղ գնանշումները գանգուր գնանշումներով VBA- ի օգտագործմամբ փոխարինելու համար սեղմեք Ֆայլ> Տարբերակ > Ջրամեկուսացման եւ սեղմեք Ինքնուղղում Ընտրանքներ եւ ընտրեք «Ուղիղ գնանշումներ» ՝ «խելացի մեջբերումներով» նախ նշեք տուփը. (Նշումեթե ցանկանում եք բոլոր գանգուր գները փոխարինել ուղիղ չակերտներով, խնդրում ենք ջնջել «Ուղիղ գնանշումները» վանդակը «խելացի գնանշումներ» -ով):

Քայլ 1. Սեղմեք «Alt-F11”Բացել Microsoft Visual Basic կիրառական ծրագրի պատուհանը;

Քայլ 2: Սեղմեք Մոդուլներ մասին Տեղադրել ներդիրը, պատճենեք և տեղադրեք հետևյալ VBA կոդը ՝ Մոդուլներ պատուհան;

Քայլ 3. Ապա կտտացրեք Վազում VBA կիրառելու կոճակը:

Հետևյալ VBA- ն ուղիղ գնանշումները գանգուր գնի փոխելու համար է.

Sub ChangeDoubleStraightQuotes()
'Update 20131107
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = """"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord =False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

 

Հետևյալ VBA- ն պետք է գանգուր գները փոխի ուղիղ գնի:

Sub ReplaceSmartQuotes()
Dim vFindText As Variant
Dim vReplText As Variant
Dim i As Long
vFindText = Array("[^0145^0146]", "[^0147^0148]")
vReplText = Array("^039", "^034")
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.MatchWholeWord = True
.MatchWildcards = True
For i = LBound(vFindText) To UBound(vFindText)
.Text = vFindText(i)
.Replacement.Text = vReplText(i)
.Execute Replace:=wdReplaceAll
Next i
End With
End Sub


Բառի արտադրողականության առաջարկվող գործիքներ

 

Kutools Word- ի համար. Word- ի ավելի քան 100 առաջադեմ առանձնահատկություններ, խնայեք ձեր 50% ժամանակը

  • Բարդ և կրկնվող գործողությունները կարող են կատարվել միանգամյա մշակմամբ վայրկյանների ընթացքում:
  • Տեղադրեք բազմաթիվ պատկերներ միանգամից թղթապանակների մեջ Word փաստաթղթում:
  • Միացրեք և միացրեք բազմաթիվ Word ֆայլեր թղթապանակների մեջ մեկում ՝ ձեր ցանկալի պատվերի հետ:
  • Ընթացիկ փաստաթուղթը բաժանեք առանձին փաստաթղթերի `ըստ վերնագրի, հատվածի ընդմիջման կամ այլ չափանիշների:
  • Փոխարկել ֆայլերը Doc- ի և Docx- ի, Docx- ի և PDF- ի միջև, ընդհանուր փոխակերպումների և ընտրության գործիքների հավաքածու և այլն ...
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (5)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ձեր բացատրությունը՝ «Գտնել/Փոխարինել» թիվ 2 հրահանգից փոխարինելու վերաբերյալ բոլորովին անհասկանալի է:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Կարծում եմ բացատրությունը գտել եմ մեկ այլ էջում։ Եթե ​​դուք պարզապես փոխարինեք բոլորը և խնդրեք նրան փոխարինել մեկ չակերտները կամ կրկնակի չակերտները ճիշտ նույն խորհրդանիշով, այն կանցնի և կկիրառի ձեր ավտոմատ ուղղման կանոնները, այդ թվում՝ ուղիղ չակերտները խելացի չակերտներով փոխարինելու համար: Այսպիսով, այն պետք է թարմացնի այդ բոլորը խելացի մեջբերումների, ինչպես որ գնում է:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Իմ խնդիրն այն է, որ ես նորմալ աշխատում եմ գերմաներենով, բայց ունեմ անգլերեն փաստաթուղթ, որը նշել եմ որպես «անգլերեն»: Այնուհետև ես գտա և փոխարինեցի, և այն փոխարկեց դրանք ստորին «և վերին», ինչպես դա տեղի կունենա գերմաներենում: Ես նայեցի բոլոր կարգավորումները, բայց չգտա: Ես փոխել եմ բառարանի լեզուն և մնացած ամեն ինչ, ինչ կարող էի գտնել անգլերենի... գաղափար կա՞:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Սա էլ իմ խնդիրն է։ Երբևէ պատասխան գտա՞ք:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
«Ուղիղ» չակերտները «խելացի» փոխելու VBA կոդի մեթոդը հիանալի աշխատեց: Շնորհակալություն!
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր