✅ Step-by-Step: Windows 11 me Word Macro ke liye Shortcut Key Set Karna

-

 


🔹 Step 1: Macro Create Karo

  1. Open Microsoft Word.

  2. Press Alt + F11 → VBA Editor open hoga.

  3. Insert > Module par click karo.

  4. Paste ye combined macro code:

vba

Sub ToggleTextCase()
    Dim txt As String
    Dim newText As String

    txt = Selection.Range.Text

    If txt = UCase(txt) Then
        newText = StrConv(txt, vbProperCase)
    ElseIf txt = StrConv(txt, vbProperCase) Then
        newText = LCase(txt)
    Else
        newText = UCase(txt)
    End If

    Selection.Range.Text = newText
End Sub

Comments

Post a Comment

Popular posts from this blog

✅ HTML Code: VBA Case Conversion Macros for MS Word & Excel

-
VBA Code for Case Conversion in Word & Excel 💻 VBA Case Conversion Macros for MS Word and MS Excel This page includes useful VBA macros to convert selected text to UPPER CASE , lower case , Proper Case , and Toggle Case for both Microsoft Word and Excel. 📄 Microsoft Word VBA Codes 🔠 Convert to UPPER CASE Sub ConvertToUpperCase() Selection.Range.Text = UCase(Selection.Range.Text) End Sub 🔡 Convert to lower case Sub ConvertToLowerCase() Selection.Range.Text = LCase(Selection.Range.Text) End Sub 🅿️ Convert to Proper Case Sub ConvertToProperCase() Selection.Range.Text = StrConv(Selection.Range.Text, vbProperCase) End Sub 🔁 Toggle Between All Cases Sub ToggleTextCase() Dim txt As String Dim newText As String txt = Selection.Range.Text If txt = UCase(txt) Then newText = StrConv(txt, vbProperCase) ElseIf txt = StrConv(txt, vbProperCase) Then newText = LCase(txt) Else n...
Read more

Site password set pest kro Head ke uper

-
<script> (function () {   var correctPassword = &quot;1234&quot;; // 👈 apna password yahan likho   function askPassword() {     var userPass = prompt(&quot;Enter Password to Open Site:&quot;);     // Agar user Cancel kare     if (userPass === null) {       askPassword();       return;     }     // Agar password galat ho     if (userPass !== correctPassword) {       alert(&quot;Wrong Password! Try Again.&quot;);       askPassword(); // 🔁 Retry option     }   }   // Page load par password pucho   askPassword(); })(); </script>
Read more