Discussion:
LOL... Stupid Democrat Got Laughed Off Twitter, Because She Was As Stupids As Lee Lee The Wee Wee Wrangler
(too old to reply)
AlleyCat
2024-11-15 19:37:50 UTC
Permalink
Do Nazi's wear JERUSELUM crosses?

REALLY?

https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpgandname=large

=====

Laughed off the Internet:

Claire
@ClaireFosterPHD
14 Nov
Trumps secretary of defense.... are we supposed to pretend that isn't a SWASTIKA

https://pbs.twimg.com/media/GcXBLafXYAAipyf?format=jpgandname=large

BWAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHA

Yes we are, mainly because it isn't a swastika. It's a Jerusalem Cross, STUPID.

https://pbs.twimg.com/media/GcasGOHXkAA9qZk?format=jpgandname=large

=====

Nuff Said IFB
@NuffSaid1960
6h
Replying to @RangerUpCoffee
It clearly is not a Swastika, but the uneducated liberals will see what they want to see.

https://pbs.twimg.com/media/GcbVsgDbMAAG8JO?format=jpgandname=large

https://pbs.twimg.com/media/GccxIHMW4AEkxj0?format=pngandname=900x900

Again, moronic monkey dick, just because someone adopts something someone else does, does NOT "link" them.

=====

On Fri, 15 Nov 2024 17:32:58 +0000, Lee says...

What a fucking dumb ass.

See? THIS is the kind of thing that makes us laugh and you look stupid, stupid.
Trump's Pick to Lead U.S. Military Has Tattoos Linked to White Supremacists and Nazis
I have a dog. Nazis love dogs. Am I a Nazi, stupid?

=====

Leftist media get it wrong again as they brand new Trump appointee Pete Hegseth a 'NAZI'

This is NOT a Nazi symbol, It is OUR Templar Symbol of the Holy 'Jerusalem Cross' as seen in our Priory Church of St Mary Magdalene.

https://pbs.twimg.com/media/GcbvXWgWwAAAQmw?format=jpgandname=900x900
https://pbs.twimg.com/media/Gcbvw-_X0AEp9r1?format=jpgandname=large

=====

Liberals: Pete Hegseth shouldn't be taken seriously.

Also Liberals:

https://pbs.twimg.com/media/GcRcu3TXsAA78D2?format=jpgandname=large
https://pbs.twimg.com/media/GcRlH3CXIAAGGyy?format=jpgandname=large

=====

Guys, let's put our heads together and figure out why the left hates Pete Hegseth...

https://pbs.twimg.com/media/GcPzuV4W4AA85Is?format=jpgandname=large

Pure jealousy.

None of you could EVER be that happy, so you're simply jealous.

=====

Before this nonsense starts, Pete Hegseth's tattoo is a Jerusalem cross. This is mine. It was the symbol of the Latin Kingdom of Jerusalem
in the Middle Ages and is a typical tattoo for Catholics to get to commemorate a trip to the Holy Land.

https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpgandname=large

https://pbs.twimg.com/media/GcbvXWgWwAAAQmw?format=jpgandname=900x900

=====

Not only is Pete Hegseth qualified, he has never stolen a lady's luggage.

https://pbs.twimg.com/media/GcR9hErXwAAvZbp?format=jpgandname=large

=====

The Dead Media:
"You have to respect Tim Walz's military service even though he lied about his rank and serving in combat!"

Also, the Dead Media:
"Pete Hegseth is a talk show host!! RRREEEEEEEE!!"

https://pbs.twimg.com/media/GcO_8MbXEAAQXqh?format=pngandname=large
vs.
https://pbs.twimg.com/media/GcPABynWsAAaqtT?format=pngandname=240x240

=====

Trump WINS!

Donald Trump is the 47th U.S. president, defeating Vice President Kamala Harris.

Republican Donald Trump was elected President of the United States in the 2024 election, defeating Vice President Kamala Harris.

Trump, 78, will begin his second term early next year.

Donald Trump will be inaugurated as the U.S. President on Monday, January 20, 2025, on the West Front of the U.S. Capitol in Washington,
D.C.

A Second Trump Administration
Alan
2024-11-15 19:48:32 UTC
Permalink
Post by AlleyCat
Do Nazi's wear JERUSELUM crosses?
REALLY?
https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpgandname=large
Why do you deliberately break your URLs?
AlleyCat
2024-11-15 20:48:05 UTC
Permalink
On Fri, 15 Nov 2024 11:48:32 -0800, Alan says...
Post by Alan
Post by AlleyCat
Do Nazi's wear JERUSELUM crosses?
REALLY?
https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpg&name=large
Why do you deliberately break your URLs?
LOL... that's one of my macros. Sorry.

Try these.

LOL... you might not REALLY want to see them. They make Democrats look pretty stupid.

=====

Do Nazi's wear JERUSALEM crosses?

REALLY?

https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpg&name=large

=====

Laughed off the Internet:

Claire
@ClaireFosterPHD
14 Nov
Trumps secretary of defense.... are we supposed to pretend that isn't a SWASTIKA

https://pbs.twimg.com/media/GcXBLafXYAAipyf?format=jpg&name=small

BWAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHA

Yes we are, mainly because it isn't a swastika. It's a Jerusalem Cross, STUPID.

https://pbs.twimg.com/media/GcasGOHXkAA9qZk?format=jpg&name=large

=====

Nuff Said IFB
@NuffSaid1960
6h
Replying to @RangerUpCoffee
It clearly is not a Swastika, but the uneducated liberals will see what they want to see.

https://pbs.twimg.com/media/GcbVsgDbMAAG8JO?format=jpg&name=large

https://pbs.twimg.com/media/GccxIHMW4AEkxj0?format=png&name=900x900

Again, moronic monkey dick, just because someone adopts something someone else does, does NOT "link" them.

=====

On Fri, 15 Nov 2024 17:32:58 +0000, Lee says...

What a fucking dumb ass.

See? THIS is the kind of thing that makes us laugh and you look stupid, stupid.
Post by Alan
Trump's Pick to Lead U.S. Military Has Tattoos Linked to White Supremacists and Nazis
I have a dog. Nazis love dogs. Am I a Nazi, stupid?

=====

Leftist media get it wrong again as they brand new Trump appointee Pete Hegseth a 'NAZI'

This is NOT a Nazi symbol, It is OUR Templar Symbol of the Holy 'Jerusalem Cross' as seen in our Priory Church of St Mary Magdalene.

https://pbs.twimg.com/media/GcbvXWgWwAAAQmw?format=jpg&name=900x900
https://pbs.twimg.com/media/Gcbvw-_X0AEp9r1?format=jpg&name=large

=====

Liberals: Pete Hegseth shouldn't be taken seriously.

Also Liberals:

https://pbs.twimg.com/media/GcRcu3TXsAA78D2?format=jpg&name=large
https://pbs.twimg.com/media/GcRlH3CXIAAGGyy?format=jpg&name=large

=====

Guys, let's put our heads together and figure out why the left hates Pete Hegseth...

https://pbs.twimg.com/media/GcPzuV4W4AA85Is?format=jpg&name=large

Pure jealousy.

None of you could EVER be that happy, so you're simply jealous.

=====

Before this nonsense starts, Pete Hegseth's tattoo is a Jerusalem cross. This is mine. It was the symbol of the Latin Kingdom of Jerusalem
in the Middle Ages and is a typical tattoo for Catholics to get to commemorate a trip to the Holy Land.

https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpg&name=large

https://pbs.twimg.com/media/GcbvXWgWwAAAQmw?format=jpg&name=900x900

=====

Not only is Pete Hegseth qualified, he has never stolen a lady's luggage.

https://pbs.twimg.com/media/GcR9hErXwAAvZbp?format=jpg&name=large

=====

The Dead Media:
"You have to respect Tim Walz's military service even though he lied about his rank and serving in combat!"

Also, the Dead Media:
"Pete Hegseth is a talk show host!! RRREEEEEEEE!!"

https://pbs.twimg.com/media/GcO_8MbXEAAQXqh?format=png&name=large
vs.
https://pbs.twimg.com/media/GcPABynWsAAaqtT?format=png&name=240x240

=====

Trump WINS!

Donald Trump is the 47th U.S. president, defeating Vice President Kamala Harris.

Republican Donald Trump was elected President of the United States in the 2024 election, defeating Vice President Kamala Harris.

Trump, 78, will begin his second term early next year.

Donald Trump will be inaugurated as the U.S. President on Monday, January 20, 2025, on the West Front of the U.S. Capitol in Washington,
D.C.

A Second Trump Administration

Message-ID: <***@news.eternal-september.org>
Alan
2024-11-15 20:51:55 UTC
Permalink
Post by AlleyCat
On Fri, 15 Nov 2024 11:48:32 -0800, Alan says...
Post by Alan
Post by AlleyCat
Do Nazi's wear JERUSELUM crosses?
REALLY?
https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpg&name=large
Why do you deliberately break your URLs?
LOL... that's one of my macros. Sorry.
Riiiiiiiiiight.
AlleyCat
2024-11-15 21:11:03 UTC
Permalink
On Fri, 15 Nov 2024 12:51:55 -0800, Alan says...
Post by Alan
Post by AlleyCat
On Fri, 15 Nov 2024 11:48:32 -0800, Alan says...
Post by Alan
Post by AlleyCat
Do Nazi's wear JERUSELUM crosses?
REALLY?
https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpg&name=large
Why do you deliberately break your URLs?
LOL... that's one of my macros. Sorry.
Riiiiiiiiiight.
Thanks for understanding. I knew you'd get it.

Find the "&" to "and"... win a prize.

' Macro recorded 8/25/2016 by AlleyCat ' ... Selection.WholeStory Selection.Delete Unit:=wdCharacter, Count:=1 Selection.PasteSpecial
Datatype:=wdPasteText ' Selection.TypeText Text:="PRINT SOMETHING" With Selection.find .Text = "~" .Replacement.Text = "~" .Forward = True
.Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.WholeStory '
Application.Run MacroName:="Test" With Selection.find .Text = """" .Replacement.Text = """" .Forward = True .Wrap = wdFindContinue .Format
= False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl =
False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False
.MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = vbTab .Replacement.Text = "" .Forward
= True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting With Selection.find .Text = "," .Replacement.Text = "," .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = """" .Replacement.Text =
"""" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " - " .Replacement.Text = " -
" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics
= False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = " - " .Replacement.Text = " - " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text =
"..." .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord
= False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "," .Replacement.Text = "," .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text =
"... " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'~" .Replacement.Text =
"'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll ' Start
"Title" Paste With Selection.find .Text = "n" .Replacement.Text = "n" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase =
False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll ' Selection.WholeStory ' Dim oRng As
Word.Range ' Set oRng = Selection.Range ' If oRng.Characters.Last = Chr(13) Or oRng.Characters.Last = Chr(11) Then ' oRng.End = oRng.End -
1 ' End If ' oRng.Text = Replace(Replace(oRng.Text, Chr(11), " "), Chr(13), " ") ' lbl_Exit: With Selection.find .Text =
"'~" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
"..." .Replacement.Text = "..." .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = """ .Replacement.Text = """" .Forward = True .Wrap
= wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza
= False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
""" .Replacement.Text = """" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "A " .Replacement.Text = "A " .Forward = True .Wrap
= wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "At
" .Replacement.Text = "At " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With With Selection.find .Text = "wy
" .Replacement.Text = "wy " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:
=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase =
False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
"-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:
=wdReplaceAll With Selection.find .Text = ""'s" .Replacement.Text = "'s" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase
= True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
""'t" .Replacement.Text = "'t" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "LOL" .Replacement.Text = "LOL" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll ' End "Title" Paste With Selection.find .Text = "'~" .Replacement.Text =
"'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "=large" .Replacement.Text = "=large" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "=large" .Replacement.Text = "=large" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " I
" .Replacement.Text = " I " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:
=wdReplaceAll With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase =
False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting Selection.find.Replacement.ClearFormatting With
Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "/" .Replacement.Text = "/" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text =
"" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics =
False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = True .MatchWholeWord =
False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings
= False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True
.MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " the " .Replacement.Text = " the " .Forward = True
.Wrap = wdFindContinue .Format = True .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text =
"" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics
= False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord
= False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text =
"" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics
= False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = " " .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord
= False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " " .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue
.Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.Execute With Selection.find .Text = "
" .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida =
False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:
=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text = "..." .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase
= False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "with e" .Replacement.Text = "with e" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
'the" .Replacement.Text = 'the" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = True
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll Selection.find.ClearFormatting Selection.find.Replacement.ClearFormatting With Selection.find .Text =
"" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida =
False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:
=wdReplaceAll ' Selection.WholeStory ' Dim oRng As Word.Range ' Set oRng = Selection.Range ' If oRng.Characters.Last = Chr(13) Or
oRng.Characters.Last = Chr(11) Then ' oRng.End = oRng.End - 1 ' End If ' oRng.Text = Replace(Replace(oRng.Text, Chr(11), " "), Chr(13), "
") ' lbl_Exit: With Selection.find .Text = ". " .Replacement.Text = ". " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase
= False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text = "..." .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting Selection.find.Execute With Selection.find .Text = " " .Replacement.Text = " " .Forward = True
.Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
"" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida =
False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchFuzzy = False .MatchWildcards = True End With Selection.find.Execute Replace:
=wdReplaceAll With ActiveDocument.PageSetup .LineNumbering.Active = False .Orientation = wdOrientPortrait .TopMargin = InchesToPoints(0.5)
.BottomMargin = InchesToPoints(0.5) .LeftMargin = InchesToPoints(0.5) .RightMargin = InchesToPoints(0.5) .Gutter = InchesToPoints(0)
.HeaderDistance = InchesToPoints(0.5) .FooterDistance = InchesToPoints(0.5) .PageHeight = InchesToPoints(11) .PageWidth = InchesToPoints
(8.5) .FirstPageTray = wdPrinterDefaultBin .OtherPagesTray = wdPrinterDefaultBin .SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False .DifferentFirstPageHeaderFooter = False .VerticalAlignment = wdAlignVerticalTop .SuppressEndnotes =
True .MirrorMargins = False .TwoPagesOnOne = False .BookFoldPrinting = False .BookFoldRevPrinting = False .BookFoldPrintingSheets = 1
.GutterPos = wdGutterPosLeft .SectionDirection = wdSectionDirectionLtr .LayoutMode = wdLayoutModeDefault
ActiveWindow.ActivePane.View.Zoom.PageFit = wdPageFitFullPage End With Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting Selection.WholeStory ' Remove Indent Dim p As Word.Paragraph Dim I As Long Dim rng As Word.Range
For Each p In ActiveDocument.Paragraphs Set rng = p.Range.Characters.First 'Test for a space or TAB character If rng.Text = " " Or rng.Text
= Chr(9) Then I = rng.MoveEndWhile(" " + Chr(9)) Debug.Print I rng.Delete End If Next p ' Remove Indent End Selection.Cut
ActiveDocument.Save ActiveDocument.Close Application.Quit End Sub

=====

Trump WINS!

Donald Trump is the 47th U.S. president, defeating Vice President Kamala Harris.

Republican Donald Trump was elected President of the United States in the 2024 election, defeating Vice President Kamala Harris.

Trump, 78, will begin his second term early next year.

Donald Trump will be inaugurated as the U.S. President on Monday, January 20, 2025, on the West Front of the U.S. Capitol in Washington,
D.C.

A Second Trump Administration
Alan
2024-11-15 21:15:48 UTC
Permalink
Post by AlleyCat
On Fri, 15 Nov 2024 12:51:55 -0800, Alan says...
Post by Alan
Post by AlleyCat
On Fri, 15 Nov 2024 11:48:32 -0800, Alan says...
Post by Alan
Post by AlleyCat
Do Nazi's wear JERUSELUM crosses?
REALLY?
https://pbs.twimg.com/media/GcXXgUKWYAATQWa?format=jpg&name=large
Why do you deliberately break your URLs?
LOL... that's one of my macros. Sorry.
Riiiiiiiiiight.
Thanks for understanding. I knew you'd get it.
Find the "&" to "and"... win a prize.
So where did you copy that from?
Post by AlleyCat
' Macro recorded 8/25/2016 by AlleyCat ' ... Selection.WholeStory Selection.Delete Unit:=wdCharacter, Count:=1 Selection.PasteSpecial
Datatype:=wdPasteText ' Selection.TypeText Text:="PRINT SOMETHING" With Selection.find .Text = "~" .Replacement.Text = "~" .Forward = True
.Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.WholeStory '
Application.Run MacroName:="Test" With Selection.find .Text = """" .Replacement.Text = """" .Forward = True .Wrap = wdFindContinue .Format
= False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl =
False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False
.MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = vbTab .Replacement.Text = "" .Forward
= True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting With Selection.find .Text = "," .Replacement.Text = "," .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = """" .Replacement.Text =
"""" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " - " .Replacement.Text = " -
" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics
= False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = " - " .Replacement.Text = " - " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text =
"..." .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord
= False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "," .Replacement.Text = "," .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text =
"... " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'~" .Replacement.Text =
"'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll ' Start
"Title" Paste With Selection.find .Text = "n" .Replacement.Text = "n" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase =
False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll ' Selection.WholeStory ' Dim oRng As
Word.Range ' Set oRng = Selection.Range ' If oRng.Characters.Last = Chr(13) Or oRng.Characters.Last = Chr(11) Then ' oRng.End = oRng.End -
1 ' End If ' oRng.Text = Replace(Replace(oRng.Text, Chr(11), " "), Chr(13), " ") ' lbl_Exit: With Selection.find .Text =
"'~" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
"..." .Replacement.Text = "..." .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = """ .Replacement.Text = """" .Forward = True .Wrap
= wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza
= False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
""" .Replacement.Text = """" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "A " .Replacement.Text = "A " .Forward = True .Wrap
= wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "At
" .Replacement.Text = "At " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
.MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With With Selection.find .Text = "wy
" .Replacement.Text = "wy " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase =
False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
"-" .Replacement.Text = "-" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
=wdReplaceAll With Selection.find .Text = ""'s" .Replacement.Text = "'s" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase
= True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
""'t" .Replacement.Text = "'t" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "LOL" .Replacement.Text = "LOL" .Forward = True .Wrap = wdFindContinue .Format = False
.MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll ' End "Title" Paste With Selection.find .Text = "'~" .Replacement.Text =
"'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False
.MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms
= False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "=large" .Replacement.Text = "=large" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "=large" .Replacement.Text = "=large" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " I
" .Replacement.Text = " I " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida
= False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
=wdReplaceAll With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase =
False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting Selection.find.Replacement.ClearFormatting With
Selection.find .Text = "'" .Replacement.Text = "'" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False
.MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "/" .Replacement.Text = "/" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text =
"" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics =
False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = True .MatchWholeWord =
False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings
= False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True
.MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False
.MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy =
False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " the " .Replacement.Text = " the " .Forward = True
.Wrap = wdFindContinue .Format = True .MatchCase = True .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text =
"" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics
= False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord
= False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue
.Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "" .Replacement.Text =
"" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics
= False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False
.MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With
Selection.find .Text = " " .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord
= False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False
.CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With
Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = " " .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue
.Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False
.MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards
= False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.Execute With Selection.find .Text = "
" .Replacement.Text = " " .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida =
False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text = "..." .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase
= False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "with e" .Replacement.Text = "with e" .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
'the" .Replacement.Text = 'the" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = True
.MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings =
False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute
Replace:=wdReplaceAll Selection.find.ClearFormatting Selection.find.Replacement.ClearFormatting With Selection.find .Text =
"" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida =
False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
=wdReplaceAll ' Selection.WholeStory ' Dim oRng As Word.Range ' Set oRng = Selection.Range ' If oRng.Characters.Last = Chr(13) Or
oRng.Characters.Last = Chr(11) Then ' oRng.End = oRng.End - 1 ' End If ' oRng.Text = Replace(Replace(oRng.Text, Chr(11), " "), Chr(13), "
") ' lbl_Exit: With Selection.find .Text = ". " .Replacement.Text = ". " .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase
= False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte =
False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = False .MatchFuzzy = False End
With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text = "..." .Replacement.Text = "..." .Forward = True .Wrap =
wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza =
False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike = False
.MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting Selection.find.Execute With Selection.find .Text = " " .Replacement.Text = " " .Forward = True
.Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False
.MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False .MatchAllWordForms = False .MatchSoundsLike
= False .MatchWildcards = False .MatchFuzzy = False End With Selection.find.Execute Replace:=wdReplaceAll With Selection.find .Text =
"" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida =
False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = False .MatchByte = False .CorrectHangulEndings = False
=wdReplaceAll With ActiveDocument.PageSetup .LineNumbering.Active = False .Orientation = wdOrientPortrait .TopMargin = InchesToPoints(0.5)
.BottomMargin = InchesToPoints(0.5) .LeftMargin = InchesToPoints(0.5) .RightMargin = InchesToPoints(0.5) .Gutter = InchesToPoints(0)
.HeaderDistance = InchesToPoints(0.5) .FooterDistance = InchesToPoints(0.5) .PageHeight = InchesToPoints(11) .PageWidth = InchesToPoints
(8.5) .FirstPageTray = wdPrinterDefaultBin .OtherPagesTray = wdPrinterDefaultBin .SectionStart = wdSectionNewPage
.OddAndEvenPagesHeaderFooter = False .DifferentFirstPageHeaderFooter = False .VerticalAlignment = wdAlignVerticalTop .SuppressEndnotes =
True .MirrorMargins = False .TwoPagesOnOne = False .BookFoldPrinting = False .BookFoldRevPrinting = False .BookFoldPrintingSheets = 1
.GutterPos = wdGutterPosLeft .SectionDirection = wdSectionDirectionLtr .LayoutMode = wdLayoutModeDefault
ActiveWindow.ActivePane.View.Zoom.PageFit = wdPageFitFullPage End With Selection.find.ClearFormatting
Selection.find.Replacement.ClearFormatting Selection.WholeStory ' Remove Indent Dim p As Word.Paragraph Dim I As Long Dim rng As Word.Range
For Each p In ActiveDocument.Paragraphs Set rng = p.Range.Characters.First 'Test for a space or TAB character If rng.Text = " " Or rng.Text
= Chr(9) Then I = rng.MoveEndWhile(" " + Chr(9)) Debug.Print I rng.Delete End If Next p ' Remove Indent End Selection.Cut
ActiveDocument.Save ActiveDocument.Close Application.Quit End Sub
=====
Trump WINS!
Donald Trump is the 47th U.S. president, defeating Vice President Kamala Harris.
Republican Donald Trump was elected President of the United States in the 2024 election, defeating Vice President Kamala Harris.
Trump, 78, will begin his second term early next year.
Donald Trump will be inaugurated as the U.S. President on Monday, January 20, 2025, on the West Front of the U.S. Capitol in Washington,
D.C.
A Second Trump Administration
AlleyCat
2024-11-15 21:26:03 UTC
Permalink
On Fri, 15 Nov 2024 13:15:48 -0800, Alan says...
Post by Alan
Post by AlleyCat
Post by Alan
Post by AlleyCat
LOL... that's one of my macros. Sorry.
Riiiiiiiiiight.
Thanks for understanding. I knew you'd get it.
Find the "&" to "and"... win a prize.
So where did you copy that from?
From the macro I started writing 8 years ago.

It's all right there in the first line. Gah!

Wanna pitcher?

Oh... and PLONK!

=====

Macro recorded 8/25/2016 by AlleyCat ' ... Selection.WholeStory Selection.Delete Unit:=wdCharacter, Count:=1 Selection.PasteSpecial
Datatype:=wdPasteText ' Selection.TypeText Text:="PRINT SOMETHING" With Selection.find .Text = "~" .Replacement.Text = "~" .Forward = True

======================================================================================================================

Internet Trolls Are Narcissists, Psychopaths, And Sadists Trolls Will Lie, Exaggerate, And Offend TO GET A RESPONSE [so true]

Loser
AlleyPussyBitch
Pole-puffing no-fight squat-to-piss shrieking estrogen-oozing
fairy
Pussey

Of course, these never work, AS INTENDED.

=====

An Internet troll is someone who enters an online discussion and posts comments designed to upset or disrupt the conversation.

=====

Alan Baker, The Creepy Internet Stalker!

MuahMan's profile photo
MuahMan
Feb 13, 2008, 12:19:48AM


to
Yikes. He's spent the last 48 hours researching me.

They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.

Anyone thinking of hiring this internet stalker Alan Baker from Vancouver,
BC should certainly give him a psych eval. As according to this website
people that

stalk others on the internet more times than not leads to pedophilia. Alan
Baker is obviously bordering on or has become a child predator.

http://www.canadafreepress.com/2007/internet-security090507.htm

Yikes. If something happens to me please make sure the local, and Canadian
police no that I was being stalked online by Alan Baker, A Macintosh bench
tech from Vancouver, BC.


Please post this every newsgroup so your children know to avoid him and thus
remove themselves from danger.

Alan Baker's profile photo
Alan Baker
Feb 13, 2008, 2:47:35AM


to
Post by Alan
Yikes. He's spent the last 48 hours researching me.
Nope. I took about 45 minutes.
Post by Alan
They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.
People whose lives are so public shouldn't say things that could get
them sued.
Post by Alan
Anyone thinking of hiring this internet stalker Alan Baker from Vancouver,
BC should certainly give him a psych eval. As according to this website
people that
stalk others on the internet more times than not leads to pedophilia. Alan
Baker is obviously bordering on or has become a child predator.
http://www.canadafreepress.com/2007/internet-security090507.htm
Or perhaps I should just inform the IRS about the possessions you've
bragged about to clear up that tax lien...

Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Post by Alan
Yikes. If something happens to me please make sure the local, and Canadian
police no that I was being stalked online by Alan Baker, A Macintosh bench
tech from Vancouver, BC.
Please post this every newsgroup so your children know to avoid him and thus
remove themselves from danger.
Alan Baker
Vancouver, British Columbia
"If you raise the ceiling four feet, move the fireplace from that wall
to that wall, you'll still only get the full stereophonic effect if you
sit in the bottom of that cupboard."

MuahMan's profile photo
MuahMan
Feb 13, 2008, 2:55:05AM


to
Post by Alan
Post by AlleyCat
Yikes. He's spent the last 48 hours researching me.
Nope. I took about 45 minutes.
Post by AlleyCat
They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.
People whose lives are so public shouldn't say things that could get
them sued.
Hire a lawyer and sue away. Two people can do research you sick perv.
Post by Alan
Post by AlleyCat
Anyone thinking of hiring this internet stalker Alan Baker from
Vancouver,
BC should certainly give him a psych eval. As according to this website
people that
stalk others on the internet more times than not leads to pedophilia.
Alan
Baker is obviously bordering on or has become a child predator.
http://www.canadafreepress.com/2007/internet-security090507.htm
Or perhaps I should just inform the IRS about the possessions you've
bragged about to clear up that tax lien...
www.irs.gov
Post by Alan
Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Do your parents know you harass elderly people at 1am and threaten to kill
them on the phone?
Seriously get over your obsession with me. Find a hobby and quit spending
day and night worrrying, stalking, and threatening my family.
Keep bothering my family and you'll have another restraining order against
you.
Post by Alan
Post by AlleyCat
Yikes. If something happens to me please make sure the local, and
Canadian
police no that I was being stalked online by Alan Baker, A Macintosh
bench
tech from Vancouver, BC.
Please post this every newsgroup so your children know to avoid him and
thus
remove themselves from danger.
Alan Baker
Vancouver, British Columbia
"If you raise the ceiling four feet, move the fireplace from that wall
to that wall, you'll still only get the full stereophonic effect if you
sit in the bottom of that cupboard."
Alan Baker's profile photo
Alan Baker
Feb 13, 2008, 2:59:07AM


to
Post by Alan
Post by AlleyCat
Post by Alan
Yikes. He's spent the last 48 hours researching me.
Nope. I took about 45 minutes.
Post by Alan
They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.
People whose lives are so public shouldn't say things that could get
them sued.
Hire a lawyer and sue away. Two people can do research you sick perv.
LOL

I'm sure 'two people" can. You: no.
Post by Alan
Post by AlleyCat
Post by Alan
Anyone thinking of hiring this internet stalker Alan Baker from
Vancouver,
BC should certainly give him a psych eval. As according to this website
people that
stalk others on the internet more times than not leads to pedophilia.
Alan
Baker is obviously bordering on or has become a child predator.
http://www.canadafreepress.com/2007/internet-security090507.htm
Or perhaps I should just inform the IRS about the possessions you've
bragged about to clear up that tax lien...
www.irs.gov
Is that an invitation?
Post by Alan
Post by AlleyCat
Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Do your parents know you harass elderly people at 1am and threaten to kill
them on the phone?
Seriously get over your obsession with me. Find a hobby and quit spending
day and night worrrying, stalking, and threatening my family.
Keep bothering my family and you'll have another restraining order against
you.
I've never bothered anyone, Pratt-fall. Not even you. I've just found
out a few facts.

But say, "Uncle" and I'll stop posting 'em.

:-)


MuahMan's profile photo
MuahMan
Feb 13, 2008, 3:05:31AM


to

"Alan Baker" <***@telus.net> wrote in message news:alangbaker-***@...


I believe that's a website.
I didn't invite you to call my grandparents at all hours of the night that
sure didn't stop you.
Post by Alan
Post by AlleyCat
Post by Alan
Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Do your parents know you harass elderly people at 1am and threaten to
kill
them on the phone?
Seriously get over your obsession with me. Find a hobby and quit spending
day and night worrrying, stalking, and threatening my family.
Keep bothering my family and you'll have another restraining order
against
you.
I've never bothered anyone, Pratt-fall. Not even you. I've just found
out a few facts.
But say, "Uncle" and I'll stop posting 'em.
You're not capable of bothering me. However when you bother my elderly
grandparents and get family involved you are crossing the line from online
weirdo, to complete psycho that needs help. You even stated it was fun
earlier finding personal information on people online. If your life really
that void. Perhaps instead of souring website after website trying to verify
if I have this motorcycle or that car, or that house you should get involved
in your own life. This sort of behavior has burned you before and left you
so you are unemployable and must work fixing computers for a living. You
should have learned your lesson the first time.

=====

Hey Alan Baker. You trolling fucking cunt.
89 views
texas gate
Dec 27, 2023, 8:34:49?PM

Nothing of substance to post in the off season?

You fucking simple, piece of shit, useless, cock sucker.

News's profile photo News
unread,
Jan 3, 2024, 2:24:19?PM

You mean 'Dave Royal' ?

LMAO!
Post by Alan
"Dave Royal is Alan Baker and he lives on Mount Stupid"
Post by AlleyCat
Post by Alan
There were others but that one had a few to start with for now.
'Andy Burnelli' who started that thread has a familiar style! And it
doesn't mention DroidEdit or a couple of others I've tried over the years
and not preferred such as Simple Text Editor.
This is my _last_ post to "Dave Royal" as he will be plonked (along with
his other nym of Alan Baker and all the other Alan Baker nyms out there).
OT. Please ignore if you care about the subject matter of this thread.
The only _relevant_ information in the post below are these screenshots.
<Loading Image...> Edit plain text files
<Loading Image...> Simple Text Editor shows up
<Loading Image...> Shortcut can be created
<Loading Image...> Shortcut opens as a text file
<Loading Image...> Sometimes it does NOT show up
<Loading Image...> Sometimes it can't SAVE it
<Loading Image...> Simple Text Editor Permissions
<Loading Image...> WriterP Permissions
Now back to the "Dave Royal" (aka Alan Baker) response...
<Loading Image...>
Some people try to add value in every post.
Others subtract it in every post.
In decades on Usenet, I've only plonked a handful of people who _can't_ add
value such as Snit, Dustin Cook, Sn!pe, and every nym of Alan Baker (of
which Dave Royal is but one - where there are so many I can't count them).
The nyms are OK, as with my newsreader setup, I don't even see who posts
unless I look - which is kind of like Trump words - where I don't look up
what he said unless someone tells me and I say "did he really say that?).
Point being, nothing from Dave Royal adds value (as he's Alan Baker).
In fact, Dave Royal _subtracts_ vale (aka Alan Baker) in every post.
Even if he's not Alan Baker - he has the same IQ of about 40 (which is why
he loudly proclaims to the world that he is an utter genius when he finally
figures out what was never hidden from anyone - except from dumb robots).
It irks me that people this incredibly stupid, actually exist - which is
exactly why the Mount Stupid graphs exist - which fits the iKooks well.
<Loading Image...>
Jesus Christ. Every time these low-IQ iKooks have nothing to say, they say
it. Dave Royal _is_ Alan Baker who _is_ Jack_Of_All_Trades_Master_of_None
childish kindergarten attempts at "outing" what they think they're geniuses
at, but which only proves they live squarely atop the D-K Mount Stupid.
*These strange low-IQ uneducated ignorant iKooks live squarely atop Mount Stupid*
<https://groups.google.com/g/misc.phone.mobile.iphone/c/9eiX08J_g_w>
If it takes an _adult_ more than five seconds to figure out my posts, then
they're idiots because the only purpose of the random headers is privacy
from robots - which these ignorant uneducated iKooks can't comprehend.
For God's sake, when I post a thousand screenshots to the Windows newsgroup
that have the _exact same screen_, how long can it take an idiot like you?
<Loading Image...> Windows browsers
<Loading Image...> No cortana search icon
<Loading Image...> Menus are just folders
<Loading Image...> Menu comments displayed
<Loading Image...> Comments can be changed
<Loading Image...> (deleted)
<Loading Image...> Hierarchies should match
<Loading Image...> One web browser per task
<Loading Image...> Need to organize os
How many of these does a normal person take to figure it out?
One right? Two maybe?
But iKooks? It takes them a thousand. Two thousand. Three thousand.
And then they declare that they're a "genius" for figuring it out.
When it was never hidden.
Who is that stupid?
Hell, I post a thousand screenshots to the Android newsgroup like this,
and it takes more than a thousand for you to claim you're a genius?
<https://i.postimg.cc/nVWkJT35/text01.jpg> Edit plain text files
<https://i.postimg.cc/j5dkpx5j/text02.jpg> Simple Text Editor shows up
<https://i.postimg.cc/0jzXNV7R/text03.jpg> Shortcut can be created
<https://i.postimg.cc/4yjLHp1K/text04.jpg> Shortcut opens as a text file
<https://i.postimg.cc/mDX6Rvzy/text05.jpg> Sometimes it does NOT show up
<https://i.postimg.cc/L6rwJFyy/text06.jpg> Sometimes it can't SAVE it
<https://i.postimg.cc/KzbPK6vB/text07.jpg> Simple Text Editor Permissions
<https://i.postimg.cc/50mw8s6G/text08.jpg> WriterP Permissions
I even post a thousand screenshots to the child-like Apple newsgroups,
where only the child-like Apple religious iKooks claim that they're a
genius for "finally figuring out" what was never hidden in the 1st place.
<Loading Image...> Apple _forces_ a log in!
<Loading Image...> 3 iOS 16.7.3 nag items
<Loading Image...> 2 iOS 16.7.3 nag items
<Loading Image...> 1 Update Apple ID settings
It doesn't occur to these fantastically ignorant iKooks that the
screenshots are the same, year after year, for thousands of them.
Who is _that_ stupid?
Nobody right?
Except the iKooks are.
They're so stupid, they don't even know how stupid they really are.
Post by AlleyCat
croy: there are loads of them. Just search playstore for 'text editor' and
try a few. Or FDroid or whatever you get apps from.
That's something only an idiot would say, which is why Alan Baker said it.
It means you don't know the first thing about Android text editors, Alan.
That's because you live on Mount Stupid.
--
It irks me that people this incredibly stupid, actually exist - which is
exactly why the Mount Stupid graphs exist - which fits the iKooks well.
<https://psychology.stackexchange.com/questions/17825/what-is-the-primary-source-of-the-mount-stupid-graphic>
Alan's profile photo
Alan
unread,
Jan 3, 2024, 3:31:33?PM
Post by Alan
Post by AlleyCat
Nothing of substance to post in the off season?
You fucking simple, piece of shit,
useless, cock sucker.
You mean 'Dave Royal' ?
LMAO!
And you believe this?

LOLOLOLLLOLOLOLOLOL!
texas gate's profile photo
texas gate
unread,
Jan 3, 2024, 3:51:25?PM
?
?
to
Post by Alan
And you believe this?
Alan Baker, The Creepy Internet Stalker!

MuahMan's profile photo
MuahMan
Feb 13, 2008, 12:19:48AM


to
Yikes. He's spent the last 48 hours researching me.

They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.

Anyone thinking of hiring this internet stalker Alan Baker from Vancouver,
BC should certainly give him a psych eval. As according to this website
people that

stalk others on the internet more times than not leads to pedophilia. Alan
Baker is obviously bordering on or has become a child predator.

http://www.canadafreepress.com/2007/internet-security090507.htm

Yikes. If something happens to me please make sure the local, and Canadian
police no that I was being stalked online by Alan Baker, A Macintosh bench
tech from Vancouver, BC.


Please post this every newsgroup so your children know to avoid him and thus
remove themselves from danger.

Alan Baker's profile photo
Alan Baker
Feb 13, 2008, 2:47:35AM


to
Post by Alan
Yikes. He's spent the last 48 hours researching me.
Nope. I took about 45 minutes.
Post by Alan
They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.
People whose lives are so public shouldn't say things that could get
them sued.
Post by Alan
Anyone thinking of hiring this internet stalker Alan Baker from Vancouver,
BC should certainly give him a psych eval. As according to this website
people that
stalk others on the internet more times than not leads to pedophilia. Alan
Baker is obviously bordering on or has become a child predator.
http://www.canadafreepress.com/2007/internet-security090507.htm
Or perhaps I should just inform the IRS about the possessions you've
bragged about to clear up that tax lien...

Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Post by Alan
Yikes. If something happens to me please make sure the local, and Canadian
police no that I was being stalked online by Alan Baker, A Macintosh bench
tech from Vancouver, BC.
Please post this every newsgroup so your children know to avoid him and thus
remove themselves from danger.
Alan Baker
Vancouver, British Columbia
"If you raise the ceiling four feet, move the fireplace from that wall
to that wall, you'll still only get the full stereophonic effect if you
sit in the bottom of that cupboard."

MuahMan's profile photo
MuahMan
Feb 13, 2008, 2:55:05AM


to
Post by Alan
Post by AlleyCat
Yikes. He's spent the last 48 hours researching me.
Nope. I took about 45 minutes.
Post by AlleyCat
They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.
People whose lives are so public shouldn't say things that could get
them sued.
Hire a lawyer and sue away. Two people can do research you sick perv.
Post by Alan
Post by AlleyCat
Anyone thinking of hiring this internet stalker Alan Baker from
Vancouver,
BC should certainly give him a psych eval. As according to this website
people that
stalk others on the internet more times than not leads to pedophilia.
Alan
Baker is obviously bordering on or has become a child predator.
http://www.canadafreepress.com/2007/internet-security090507.htm
Or perhaps I should just inform the IRS about the possessions you've
bragged about to clear up that tax lien...
www.irs.gov
Post by Alan
Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Do your parents know you harass elderly people at 1am and threaten to kill
them on the phone?
Seriously get over your obsession with me. Find a hobby and quit spending
day and night worrrying, stalking, and threatening my family.
Keep bothering my family and you'll have another restraining order against
you.
Post by Alan
Post by AlleyCat
Yikes. If something happens to me please make sure the local, and
Canadian
police no that I was being stalked online by Alan Baker, A Macintosh
bench
tech from Vancouver, BC.
Please post this every newsgroup so your children know to avoid him and
thus
remove themselves from danger.
Alan Baker
Vancouver, British Columbia
"If you raise the ceiling four feet, move the fireplace from that wall
to that wall, you'll still only get the full stereophonic effect if you
sit in the bottom of that cupboard."
Alan Baker's profile photo
Alan Baker
Feb 13, 2008, 2:59:07AM


to
Post by Alan
Post by AlleyCat
Post by Alan
Yikes. He's spent the last 48 hours researching me.
Nope. I took about 45 minutes.
Post by Alan
They should make internet stalking illegal, I think Alan Baker has had
practice researching the little kiddies he likes to molest.
People whose lives are so public shouldn't say things that could get
them sued.
Hire a lawyer and sue away. Two people can do research you sick perv.
LOL

I'm sure 'two people" can. You: no.
Post by Alan
Post by AlleyCat
Post by Alan
Anyone thinking of hiring this internet stalker Alan Baker from
Vancouver,
BC should certainly give him a psych eval. As according to this website
people that
stalk others on the internet more times than not leads to pedophilia.
Alan
Baker is obviously bordering on or has become a child predator.
http://www.canadafreepress.com/2007/internet-security090507.htm
Or perhaps I should just inform the IRS about the possessions you've
bragged about to clear up that tax lien...
www.irs.gov
Is that an invitation?
Post by Alan
Post by AlleyCat
Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Do your parents know you harass elderly people at 1am and threaten to kill
them on the phone?
Seriously get over your obsession with me. Find a hobby and quit spending
day and night worrrying, stalking, and threatening my family.
Keep bothering my family and you'll have another restraining order against
you.
I've never bothered anyone, Pratt-fall. Not even you. I've just found
out a few facts.

But say, "Uncle" and I'll stop posting 'em.

:-)


MuahMan's profile photo
MuahMan
Feb 13, 2008, 3:05:31AM


to

"Alan Baker" <***@telus.net> wrote in message news:alangbaker-***@...


I believe that's a website.
I didn't invite you to call my grandparents at all hours of the night that
sure didn't stop you.
Post by Alan
Post by AlleyCat
Post by Alan
Did your mother, Patricia, even know that you had a federal tax lien
hanging over your head when she agreed to put you on the deed to her
home?
Do your parents know you harass elderly people at 1am and threaten to
kill
them on the phone?
Seriously get over your obsession with me. Find a hobby and quit spending
day and night worrrying, stalking, and threatening my family.
Keep bothering my family and you'll have another restraining order
against
you.
I've never bothered anyone, Pratt-fall. Not even you. I've just found
out a few facts.
But say, "Uncle" and I'll stop posting 'em.
You're not capable of bothering me. However when you bother my elderly
grandparents and get family involved you are crossing the line from online
weirdo, to complete psycho that needs help. You even stated it was fun
earlier finding personal information on people online. If your life really
that void. Perhaps instead of souring website after website trying to verify
if I have this motorcycle or that car, or that house you should get involved
in your own life. This sort of behavior has burned you before and left you
so you are unemployable and must work fixing computers for a living. You
should have learned your lesson the first time.
Alan
2024-11-15 21:28:05 UTC
Permalink
Post by AlleyCat
On Fri, 15 Nov 2024 13:15:48 -0800, Alan says...
Post by Alan
Post by AlleyCat
Post by Alan
Post by AlleyCat
LOL... that's one of my macros. Sorry.
Riiiiiiiiiight.
Thanks for understanding. I knew you'd get it.
Find the "&" to "and"... win a prize.
So where did you copy that from?
From the macro I started writing 8 years ago.
It's all right there in the first line. Gah!
Wanna pitcher?
Oh... and PLONK!
=====
Macro recorded 8/25/2016 by AlleyCat ' ... Selection.WholeStory Selection.Delete Unit:=wdCharacter, Count:=1 Selection.PasteSpecial
Datatype:=wdPasteText ' Selection.TypeText Text:="PRINT SOMETHING" With Selection.find .Text = "~" .Replacement.Text = "~" .Forward = True
======================================================================================================================
Where is there anything in that line that would change an ampersand
character ("&"), into the characters, "and"?
AlleyCat
2024-11-22 18:16:56 UTC
Permalink
On Fri, 22 Nov 2024 16:46:09 +0000, Lee says...
Keep playing the imaginary "Nazi" card.
No one made Trump praise Nazi generals.
They probably had dogs too, like Hitler, making all of them AND Pete Hegseth, who's also had a dog, a Nazi too... right?

You are fucked in the head, but then, again... aren't you a Canadian liberal?

=====

Holier-than-thou LIBERAL Canadians, think they're soooo superior when it comes to slavery, because they "ended" it (not really) a mere 30 years
earlier.

Canada "ended" slavery a mere 30 years before Lincoln wrote the "Emancipation Proclamation".

HOW does that make Canada ANY "better" or different? It doesn't.

Canada's Shameful, Modern-Day Slave Trade
https://torontosun.com/2012/02/10/canadas-shameful-modern-day-slave-trade/wcm/2e410af6-9dc4-4ef7-bc3e-821a5970ed41

Colonial Canada Had Slavery For More Than 200 Years. And Yes, It Still Matters Today

More Canadians Say Racism Is A "Serious Problem" Today Than 1 Year Ago

Canada Urged To Open Its Eyes To Systemic Racism In Wake Of Police Violence

Racism In Canada Is Ever-Present, But We Have A Long History Of Denial

Majority (60%) See Racism as a Serious Problem in Canada Today, Up 13 points Since Last Year

Nearly a Third of Canadians (28%) Say They Have Personally Experienced Racism in the Past Year - 24 July 2020
https://www.ipsos.com/en-ca/majority-60-see-racism-serious-problem-canada-
today-13-points-last-year

Canada's Enduring Legacy Of Power, Politics And Racism
https://theclarion.ca/politicslaw/canadians-no-less-racist-than-americans/

75 Per Cent of Canadians Polled, Say Royal Canadian Mounted Police Has Systemic Racism Issue

Systemic Racism In The Royal Canadian Mounted Police Force
https://www.citynews1130.com/2020/07/11/study-canadians-agree-rcmp-systemic-
racism/

============================================================================

Holier-than-thou LIBERAL Canadians, think they're soooo superior when it comes to slavery, because they "ended" it (not really) a mere 30 years
earlier.

The Reality of Anti-Black Racism in Canada | BCG
https://www.bcg.com/en-ca/publications/2020/reality-of-anti-black-racism-in-canada
Anti-Black racism in Canada is worse than most Canadians want to believe. With the COVID-19 pandemic amplifying the injustices against Black People,
it is now more important than ever for Canadians to take action.

Racism & the Canadian historical past ...
https://divercityvisa.com/racism-the-americanization-of-canadian-historical-past-why-we-should-not-take-a-look-at-ourselves-by-a-u-s-lens
The Canadian response to racism south of the border will be described as an Americanization of Canadian historical past. The media's lack of
protection of racism in Canada, in its traditionally correct context, is a trigger for concern. Totally different histories of racism.

Racism in Canada | News, Videos & Articles
https://globalnews.ca/tag/racism-in-canada
Canadian MPs vote to condemn Atlanta mass shooting, anti-Asian racism. The move comes days after eight people were killed by a white gunman in
Atlanta. Six of the victims were Asian American women ...

Anti-Asian Racism Lead, The Canadian Race Relations ...
https://cpac-canada.ca/anti-asian-racism-lead
The Canadian Race Relations Foundation (CRRF) was created in 1996 to reaffirm the principles of justice and equality for all in Canada. The CRRF's
mandate is to facilitate throughout Canada the development, sharing, and application of knowledge and expertise to eliminate racism and all forms of
racial discrimination in Canadian society.

Is Canada a racist country? One-third of respondents in a ...
https://www.thestar.com/news/canada/2021/06/21/is-canada-a-racist-country-
one-third-of-respondents-in-a-new-study-say-yes.html
Jun 21, 2021
One-third of respondents in a new study say yes. Most Canadians agree that Canada's diverse population makes it a better country. But on the question
of whether or not Canada is a racist country ...

Most Canadians Experience Racism ... - New Canadian Media
https://newcanadianmedia.ca/most-canadians-experience-racism-where-they-live-survey
Canadian racism is sometimes called 'polite' and is characterized by microaggressions, but that is a misnomer. Words like that are used to deflect
criticisms and differentiate Canada from the United States, says Henry, though she does see similar ideologies and motivations.

Canada Must Withdraw From Racist Core Group - Yves Angler
https://yvesengler.com/2021/10/24/canada-must-withdraw-from-racist-core-group
The least Canadian antiracist activists should do is educate themselves about racism in foreign affairs. There is no justification for Canada
participating in this nakedly imperialist alliance. All Canadians of conscience owe a debt of solidarity to the people of Haiti. We must demand
Ottawa immediately withdraw from the racist Core Group.

Sikh Canadians Surge Politically In "Systemically Racist ...
https://capforcanada.com/sikh-canadians-surge-politically-in-systemically-racist-canada
"The reality is, our Canada is a place of racism, of violence." - NDP Party Leader Jagmeet Singh, June 14th 2021. An unprecedented event occurred
last night in Alberta, Canada. Sikh-Canadian candidates won in both Calgary and Edmonton mayoral elections.. Jhoti Gondek is the first Sikh-Canadian
to become mayor of Calgary. She will be taking over from Naheed Nenshi, three-time winner as ...

Racism at IRCC could determine who gets in - New Canadian ...
https://newcanadianmedia.ca/racism-at-ircc-could-determine-who-gets-in

IRCC employees are reporting racist workplace behaviour such as racially-charged microaggressions at work, says survey. NCM reporter Isabel Inclan
reports on the deeper fallout. Immigration, Refugees and Citizenship Canada (IRCC) employees remain skeptical of the measures in place to tackle
racism at their workplace, according to a new report.
--
alt.fan.rush-limbaugh, can.politics, alt.politics.trump, alt.politics.liberalism, alt.politics.democrats, alt.politics.usa.republican

============================================================================

Study Finds Startling New Data On Homophobia In Canadian Classrooms ...

https://nationalpost.com/news/canada/study-finds-startling-new-data-on-homophobia-in-canadian-classrooms

WINNIPEG - Rampant homophobia stalks the hallways and classrooms of Canadian schools, according to a key finding of a national study on homophobia in
Canadian schools to be released Thursday...

=====

As Anti-LGBTQ2 Hate Grows In Canada, Advocates Say It's 'Never Been As ...

https://globalnews.ca/news/9393280/canada-lgbtq-hate-trans-west-block/

The solution, they say, is education and support from allies to counter homophobia and anti-trans hate - particularly baseless accusations of
pedophilia and "grooming" children, which they say...

=====

Anti-LGBTQ2 Protests Are On The Rise In Canada: What's Going On?

https://globalnews.ca/news/9542496/anti-lgbtq2-protests-rise-canada-explainer/

WATCH: Family-friendly, drag storytime performances for children have become frequent targets of hatred and backlash against the LGBTQ2S+ community.
- Mar 11, 2023. A U.S. data tracker has found ...

=====

Canada A 'Laggard' On Homophobia In Sports, Studies Show

https://www.cbc.ca/sports/canada-sports-homophobia-study-1.5828617

"Canada has been a laggard globally, full stop. There's no other way to say that." Young people who came out were significantly more likely (58 per
cent versus 40 per cent) to report they'd been...

=====

People Of Colour Say Racism, Exclusion, Fetishization, Rampant In ...

https://www.cbc.ca/news/canada/saskatoon/people-of-colour-say-racism-exclusion-fetishization-rampant-in-lgbtq-communities-1.6471430

A report by Egale Canada Human Rights Trust details that lesbian, bisexual and transgender women, as well as gender diverse and two-spirit people,
encounter discrimination, stigmatization and...

=====

Liberals, NDP Note Rise Of LGBTQ2S+ Hate In Canada | CTV News

https://www.ctvnews.ca/politics/facing-calls-to-act-canadian-lawmakers-note-rising-tide-of-hate-and-violence-against-lgbtq2s-community-1.6402660

Marking the International Day Against Homophobia, Transphobia and Biphobia, federal lawmakers are drawing attention to an increase in hate and
violence directed at members of the LGBTQ2S ...

=====

Survey Shows LGBTQ Youth Still Feel Unsafe In Canadian Schools

https://www.cbc.ca/news/canada/prince-edward-island/pei-egale-canada-survey-lgbtq-youth-homophobia-1.6073698

(Jane Robertson/CBC) A national organization says homophobia in Canadian schools hasn't improved much over the last decade. Egale Canada conducted a
survey in 2012 that showed 64 per cent of...

=====

Experiences Of Violent Victimization And Unwanted ... - Statistics Canada

https://www150.statcan.gc.ca/n1/pub/85-002-x/2020001/article/00009-eng.htm

According to the 2018 Survey of Safety in Public and Private Spaces (SSPPS), an estimated 1 million people in Canada are sexual minorities-that is,
they reported their sexual orientation as gay, lesbian, bisexual or a sexual orientation that is not heterosexual-representing 4% of the population
of Canada 15 years of age and older.

=====

Apology To LGBTQ2 Communities - Women And Gender Equality Canada

https://women-gender-equality.canada.ca/en/free-to-be-me/apology-discrimination-individuals-families-communities.html

On November 28, 2017, the Prime Minister delivered a formal apology in the House of Commons to individuals harmed by federal legislation, policies
and practices that led to the oppression of and discrimination against two-spirit, lesbian, gay, bisexual, and transgender people in Canada.

=====

Statement On International Day Against Homophobia ... - Canada.Ca

https://www.canada.ca/en/global-affairs/news/2022/05/statement-on-international-day-against-homophobia-transphobia-and-biphobia.html

The International Day Against Homophobia, Transphobia and Biphobia gives us an opportunity to reaffirm the equality of LGBTQ2I persons and also
strengthen alliances and partnerships. Through education and dialogue, the world has seen progress in recent years. Several countries have taken

=====

Canada:

'Worst In The World': Here Are All The Rankings In Which Canada Is Now Last

Most Unaffordable Housing, Highest Cell phone Bills And Worst Rate of Acute Care Beds, To Name A Few

If you spend any time on social media, it's likely that you've seen this
graphic compiled by columnist Stephen Lautens that assembles 11 international
indices which feature Canada near the top spot. "Canada is broken? I don't
think so. Neither does the world," reads a caption.

Next time someone rants on how about how "broken" Canada is; or how badly we
are doing on the international stage... share some facts.

Numbers don't lie, Felicia.

https://archive.is/o/LnFRL/https://twitter.com/DIGuideBradley/status/1554545079314010112

Naturally, it only tells a partial picture. While Canada may dominate abstract
indices such as "quality of life" and "peace," there are plenty of far more
empirical indicators in which we measurably rank as among the worst in the
developed world.

There's plenty to like about Canada, but below is a not-at-all comprehensive
list of all the ways in which we are indeed very broken.

WE HAVE THE MOST UNAFFORDABLE HOUSING IN THE OECD

The Organisation for Economic Co-operation and Development is essentially a
club of the world's 38 most developed countries. And when these 38 are ranked
against each other for housing unaffordability, Canada emerges as the clear
champion. OECD analysts rank affordability by comparing average home prices to
average incomes, and according to their latest quarterly rankings Canada was
No. 1 for salaries that were most out of whack with the cost of a home.

Housing by price to income ratio for the second quarter of 2022. That's Canada
on the extreme right.

https://archive.is/LnFRL/840da40d6fa3b7fef6fcccdfc1637d24e0786760.webp

WE HAVE THE WORLD'S MOST EXPENSIVE WIRELESS COSTS

Every year, the Finnish telecom analyst Rewheel ranks the world's most
expensive countries for wireless services. And last year, Canada once again
dominated. Across several metrics, Canada was found to be the most expensive
place in the world for mobile data. Analysts found that it would cost the
average Canadian the equivalent of at least 100 Euros to obtain a cell phone
plan with at least 100 gigabytes of mobile data. Across much of the EU, that
kind of cell phone plan could be had for less than 40 Euros.

https://archive.is/LnFRL/822bcfe750687b1ef6288ee7df5606fd15629289.webp

Canadian telecoms charge more than 10 times as much for 100 gigabytes of mobile
data as companies in France or Ireland.

Canadian telecoms charge more than 10 times as much for 100 gigabytes of mobile
data as companies in France or Ireland. Photo by Rewheel

WE HAVE THE LOWEST RATE OF ACUTE CARE BEDS AMONG PEER COUNTRIES

Canada's health system was particularly walloped by COVID-19 due to the simple
fact that most of our hospitals are at the breaking point even in good times.
Multiple times during the pandemic, provinces were forced into shutdown by
rates of COVID that had barely been noticed in better-prepared countries. A
ranking by the Canadian Institute for Health Information provides one clue as
to why. When ranked against peer countries, Canada's rate of per-capita acute
care beds was in last place, albeit tied with Sweden. Canada has two acute care
beds for every 1,000 people, against 3.1 in France and six in Germany.

TWO OF THE PLANET'S "BUBBLIEST" REAL ESTATE MARKETS ARE IN CANADA

For at least 15 years now, Canada has been a regular contender on rankings of
overheated housing markets. And the latest UBS index of world cities with
"bubbly" real estate markets is no exception. In their 2021 index, Toronto was
second only to Frankfurt in terms of bubble risk, while Vancouver ranked sixth.
Aside from Germany, Canada was the only country that saw two of its cities in
the top ten.

https://archive.is/LnFRL/1961e904e18e8cb533ff42c2eae7beb611827bd4.webp

Only two cities in the entire Western Hemisphere qualified as likely "bubble
risks," and they're both in Canada.

Only two cities in the entire Western Hemisphere qualified as likely "bubble
risks," and they're both in Canada. Photo by UBS Global Real Estate Bubble
Index 2021

WE RACKED UP COVID DEBT FASTER THAN ANYONE ELSE

The COVID-19 pandemic ushered in the most feverish global accumulation of debt
in the history of human civilization. So it's rather remarkable that amidst
this international monsoon of debt, Canada still managed to out-debt everyone
else. Last year, analysts at Bloomberg tracked each country's rate of public
and private debt accumulated during the first year of the COVID-19 pandemic.
Canada came in with an overall debt burden equivalent to 352 per cent of GDP.
While a handful of countries (Japan, France and Hong Kong) came out of the
pandemic with higher overall debt burdens, Canada outranked all of them when it
came to how quickly that debt had been accumulated.

Containers on rail cars waiting to be shipped east by rail at the Port of
Vancouver Tuesday, June 21, 2022. Photo by (Photo by Jason Payne/ PNG)

https://archive.is/LnFRL/5b7e25218f55d343b998db94c6748b57312dafaf.webp

THE PORT OF VANCOUVER IS (ALMOST) THE MOST INEFFICIENT IN THE WORLD

Last year - just as the global supply chain crisis got going - the World Bank
decided to rank the performance of the world's 370 major ports. Authors weighed
factors such as how long the ports kept ships waiting, and how long crews took
to unload a vessel. And when everything was added together, the Port of
Vancouver ranked 368 out of 370. The only places with worse scores were the
Port of Los Angeles and the Port of Long Beach. And it's not like our other
ports are much better. If Vancouver is too gummed up, you can always sail north
to Prince Rupert, which ranks 339 out of 370.

https://archive.is/LnFRL/ac861be6fb2f37d1463e7670c232b5cd548d5395.webp

Take that, Los Angeles and Long Beach. Photo by World Bank Group


Queues at Toronto Pearson International Airport. Photo by Peter J.
Thompson/National Post

https://archive.is/LnFRL/b32f7be38081069e5e696a0029996f6f3adaa760.webp

TORONTO PEARSON IS THE WORLD'S MOST-DELAYED AIRPORT

Flight delays are another category in which basically the entire world is
feeling the pinch. And yet, Canada still managed to outdo all of them. Last
month, CNN used data from the website FlightAware to figure out which airports
were seeing the highest rates of flight delays. In the number one spot was
Toronto Pearson, with 52 per cent of all flights out of the airport
experiencing some kind of delay. And it was a commanding lead; the second-place
finisher, Frankfurt, only managed to see 45.4 per cent of its flights delayed.
Toronto was also a contender in flight cancellations; with 6.9 per cent of its
scheduled flights never getting off the ground, it ranked fourth worst in the
world.

WE'RE ONE OF THE WORLD'S WORST ECONOMIES FOR FOREIGN INVESTMENT

A 2020 study out of the University of Calgary tracked foreign investment flows
into a cross-section of developed countries between 2015 and 2019. Virtually
every country on the list saw a surge in foreign cash during that period;
Ireland topped out the ranking thanks to its foreign investment climbing by
more than 115 per cent. Only four countries actually saw a reduction in foreign
investment: Mexico, Brazil, Australia and Canada. A report by the Business
Council of Canada noticed the same trend. "Canada is the second-worst in the
OECD on openness to foreign direct investment," it concluded.

https://archive.is/LnFRL/222c5fba154990485338650dcb55e413d85e080c.webp

WE DRIVE THE MOST FUEL-INEFFICIENT VEHICLES IN THE WORLD

In 2019, the International Energy Agency examined the fuel economy of the
world's private car fleets. On almost every measure, Canada led the pack in
driving unnecessarily huge, gas-guzzling vehicles. Per kilometre driven, the
average Canadian burned more fuel and emitted more carbon dioxide than anyone
else. Canadian cars were also the largest and (second only to the U.S.) the
heaviest. While it would be convenient to blame this on Canada being a sparse,
cold country with lots of heavy industry, our ranking was well beyond plenty of
other countries where that was similarly the case.

=====

Trump WINS!

Donald Trump is the 47th U.S. president, defeating Vice President Kamala Harris.

Republican Donald Trump was elected President of the United States in the 2024 election, defeating Vice President Kamala Harris.

Trump, 78, will begin his second term early next year.

Donald Trump will be inaugurated as the U.S. President on Monday, January 20, 2025, on the West Front of the U.S. Capitol in Washington, D.C.

A Second Trump Administration
Loading...