Application theGlobe.Stop Dim thePandemic As String

Slavio

Board Regular
Joined
Mar 28, 2021
Messages
59
Office Version
  1. 365
Platform
  1. Windows
  2. Web
Here the idea slipped into creating the code.
Full sense code.
Code that stops at least for a while.

I would like to create code
which turns off the globe at least for a while.
And it will erase the pandemic, hatred and fear.

Please go back at least for a while,
to feel safe, love again,
but mainly that I am not alone.

VBA Code:
Sub StopThe Globe()

Dim theGlobe as String
Dim thePandemic As String
Dim theCorona As Long
Dim love as String

Application theGlobe.Stop

If Remove thePandemic.Now Then
Set TurnBack.time & Give love.Now

theCorona = is a thing of the past
End If

' The world will be more beautiful
End Sub

Will you help me complete this code?
 

Excel Facts

Return population for a City
If you have a list of cities in A2:A100, use Data, Geography. Then =A2.Population and copy down.
VBA Code:
Sub StopTheGlobe()

Dim theGlobe As String
Dim thePandemic As String
Dim theCorona As Long
Dim love As String

Application theGlobe.Stop

On Error GoTo lockdown
If RemovethePandemic = true Then
Set TurnBack.time & Givelove.Now

theCorona = is a thing of the past
Exit Sub
End If

' The world will be more beautiful

lockdown:
RemovethePandemic = false
Application.Wait (Now + TimeValue("1000:00:00"))


End Sub
 
[CODE = vba]
Sub StopTheGlobe ()

Dim theGlobe As String
Dimujte pandémiu ako reťazec
Dim the Corona As Long
Tlmená láska ako struna

Aplikácia theGlobe.Stop

Pri chybe Uzamknutie GoTo
Ak RemovethePandemic = true potom
Nastaviť TurnBack.time & Givelove.Now

theCorona = je minulosťou
Výstup
Koniec Ak

„Svet bude krajší

obmedzenie pohybu:
RemovethePandemic = false
Application.Wait (Now + TimeValue ("1000: 00: 00"))


Koniec Sub
[/ KÓD]
Great, that's exactly how I imagined it :)
I'm glad you're sharing my idea and turning it into an even better one.
Thank you for helping to create.
PS: thanks also to the admins for not deleting this post!
 

Forum statistics

Threads
1,224,939
Messages
6,181,878
Members
453,068
Latest member
DCD1872

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top