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

Sut i newid dyfyniadau syth i ddyfyniadau cyrliog mewn gair?

Fel rheol bydd y Microsoft Word yn newid dyfynbrisiau syth i ddyfyniadau cyrliog (craff ortypograffydd) wrth i chi deipio. Ond os yw'r nodwedd wedi'i diffodd, gall marciau dyfynbris sengl a dwbl ymddangos yn syth yn eich dogfen. Dyma awgrymiadau i chi newid dyfyniadau syth i ddyfyniadau cyrliog ac i'r gwrthwyneb yn Word.

Dyfyniadau syth Chang i ddyfyniadau cyrliog gyda Dod o Hyd ac Amnewid

Newid dyfynbrisiau syth i ddyfyniadau cyrliog gyda VBA


swigen dde glas saeth Newid dyfynbrisiau syth i ddyfyniadau cyrliog gyda Dod o Hyd ac Amnewid

poeth
Rhyfeddol! Defnyddiwch Tabiau Effeithlon yn Word (Office) fel Chrome, Firefox a New Internet Explorer!

Darllen mwy Lawrlwythiad Am Ddim

Cyn gwneud cais Dod o hyd ac yn ei le, dylech chi fynd i Dewisiadau Cywir Auto i ddad-dicio'r "Dyfyniadau syth" gyda "dyfyniadau craff" gwiriwch y blwch.

Yn Word 2003, Dewisiadau Cywir Auto dan y Offeryn bar. Ac yn Word 2007, yn gwneud cais Dewisiadau Cywir Auto trwy glicio  > Dewisiadau > Prawfesur > Dewisiadau Cywir Auto. Yma rydym yn cymryd Word 2010/2013 er enghraifft:

Cam 1. Cliciwch  > Opsiwn > Prawfesur > Dewisiadau Cywir Auto > AutoFormat Wrth i Chi Deipio, a dethol "Dyfyniadau syth" gyda "dyfyniadau craff" blwch gwirio. Gweler y screenshot :

Cam 2. Cliciwch Hafan > Disodli yn y Golygu grwp neu wasg Ctrl + H i arddangos Dod o hyd ac yn ei le deialog, a mynd i mewn 'or '' in Dewch o hyd i beth blwch, a mynd i mewn ' or ''in Amnewid gyda blwch. Gweler y screenshot:

Cam 3. Cliciwch Amnewid All.

Nodyn: os ydych chi am ddisodli dyfynbrisiau cyrliog gyda dyfynbrisiau syth, cliriwch "Dyfyniadau syth" gyda "dyfyniadau craff" blwch gwirio).


swigen dde glas saeth Newid dyfynbrisiau syth i ddyfyniadau cyrliog gyda VBA

I ddisodli pob dyfynbris syth gyda dyfyniadau cyrliog yn Word 2010 trwy ddefnyddio VBA, cliciwch ffeil> Opsiwn > Prawfesur a chliciwch AutoCywir Dewisiadau a dewiswch y "Dyfyniadau syth" gyda "dyfyniadau craff" blwch gwirio fel a ganlyn yn gyntaf. (Nodyn: os ydych chi am ddisodli dyfynbrisiau cyrliog gyda dyfynbrisiau syth, cliriwch "Dyfyniadau syth" gyda blwch gwirio "dyfyniadau craff").

Cam 1: Pwyswch “Alt-F11”I agor ffenestr Microsoft Visual Basic for Application;

Cam 2: Cliciwch Modiwlau ar y Mewnosod tab, copïo a gludo'r cod VBA canlynol i'r Modiwlau ffenestr;

Cam 3: Yna cliciwch Run botwm i gymhwyso'r VBA.

Y VBA canlynol yw newid dyfynbrisiau syth i ddyfyniadau cyrliog:

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

 

Y VBA canlynol yw newid dyfyniadau cyrliog i ddyfyniadau syth:

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


Offer Cynhyrchedd Geiriau a Argymhellir

 

Kutools Ar gyfer Word - Mwy Na 100 Nodweddion Uwch Ar gyfer Word, Arbedwch Eich 50% Amser

  • Gellir gwneud gweithrediadau cymhleth ac ailadroddus brosesu un-amser mewn eiliadau.
  • Mewnosodwch ddelweddau lluosog ar draws ffolderau yn nogfen Word ar unwaith.
  • Uno a chyfuno ffeiliau Word lluosog ar draws ffolderau yn un gyda'r drefn a ddymunir gennych.
  • Rhannwch y ddogfen gyfredol yn ddogfennau ar wahân yn ôl pennawd, toriad adran neu feini prawf eraill.
  • Trosi ffeiliau rhwng Doc a Docx, Docx a PDF, casglu offer ar gyfer trawsnewid a dewis cyffredin, ac ati ...
sylwadau (5)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae eich esboniad am amnewid yn Find/Replace o gyfarwyddyd #2 ymlaen yn gwbl annealladwy.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rwy'n meddwl i mi ddod o hyd i'r esboniad ar dudalen arall. Os ydych chi'n syml yn disodli'r cyfan ac yn gofyn iddo ddisodli dyfynbrisiau sengl neu ddyfynbrisiau dwbl gyda'r un symbol yn union, bydd yn mynd drwodd ac yn cymhwyso'ch rheolau awtocywir, gan gynnwys disodli dyfynbrisiau syth gyda dyfynbrisiau smart. Felly dylai ddiweddaru'r rheini i gyd i ddyfyniadau craff wrth fynd ymlaen.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Fy mhroblem yw bod gen i waith fel arfer yn Almaeneg ond mae gen i ddogfen Saesneg, a nodais fel "Saesneg". Yna fe wnes i ddarganfod ac amnewid ac fe'u trosodd i " is " ac uwch " fel y byddai'n digwydd yn Almaeneg. Edrychais ar yr holl osodiadau ond ni allwn ddod o hyd iddo. Newidiais iaith y geiriadur a phopeth arall y gallwn i ffeindio i'r Saesneg... unrhyw syniad?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Dyma fy mhroblem i hefyd. Wnaethoch chi erioed ddod o hyd i ateb?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Gweithiodd y dull cod VBA ar gyfer newid dyfyniadau "syth" i "smart" yn berffaith! Diolch!
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir