ویکی پاسخ:نکات ویرایشی: تفاوت میان نسخه‌ها

ویکی پاسخ:نکات ویرایشی (نمایش مبدأ)

نسخهٔ ‏۲۹ سپتامبر ۲۰۲۰، ساعت ۱۱:۲۱

۷۶۳ بایت اضافه‌شده ، ‏۲۹ سپتامبر ۲۰۲۰

←‏ماکرو

Nazarzadeh

دیوان‌سالاران، ناظمان (CommentStreams)، مدیران رابط کاربری، مدیران

۸٬۳۵۰

ویرایش

@@ خط ۳۳۵: / خط ۳۳۵: @@
      Selection.TypeParagraph
      Selection.TypeParagraph
-    Selection.TypeText Text:="{{ØªÚ©Ù…ÛŒÙ„ Ù…Ù‚Ø§Ù„Ù‡"
+        Selection.TypeText Text:="{{" & ChrW(1578) & ChrW(1705) & ChrW(1605) & _
+        ChrW(1740) & ChrW(1604) & " " & ChrW(1605) & ChrW(1602) & ChrW(1575) & _
+        ChrW(1604) & ChrW(1607)
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | ØªÛŒØªØ±Ù‡Ø§ = "
+     Selection.TypeText Text:=" | " & ChrW(1588) & ChrW(1606) & ChrW(1575) & _
+        ChrW(1587) & ChrW(1607) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | ÙˆÛŒØ±Ø§ÛŒØ´ = "
+     Selection.TypeText Text:=" | " & ChrW(1578) & ChrW(1740) & ChrW(1578) & _
+        ChrW(1585) & ChrW(1607) & ChrW(1575) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | Ø´Ù†Ø§Ø³Ù‡ = "
+     Selection.TypeText Text:=" | " & ChrW(1608) & ChrW(1740) & ChrW(1585) & ChrW _
+        (1575) & ChrW(1740) & ChrW(1588) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | Ù„ÛŒÙ†Ú©â€ŒØ¯Ù‡ÛŒ = "
+     Selection.TypeText Text:=" | " & ChrW(1604) & ChrW(1740) & ChrW(1606) & _
+        ChrW(1705) & ChrW(8204) & ChrW(1583) & ChrW(1607) & ChrW(1740) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | Ù†Ø§ÙˆØ¨Ø±ÛŒ = "
+     Selection.TypeText Text:=" | " & ChrW(1606) & ChrW(1575) & ChrW(1608) & _
+        ChrW(1576) & ChrW(1585) & ChrW(1740) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | Ù†Ù…Ø§ÛŒÙ‡ = "
+     Selection.TypeText Text:=" | " & ChrW(1606) & ChrW(1605) & ChrW(1575) & ChrW _
+        (1740) & ChrW(1607) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | ØªØºÛŒÛŒØ± Ù…Ø³ÛŒØ± = "
+     Selection.TypeText Text:=" | " & ChrW(1578) & ChrW(1594) & ChrW(1740) & _
+        ChrW(1740) & ChrW(1585) & " " & ChrW(1605) & ChrW(1587) & ChrW(1740) & _
+        ChrW(1585) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | Ø¨Ø§Ø²Ø¨ÛŒÙ†ÛŒ = "
+     Selection.TypeText Text:=" | " & ChrW(1576) & ChrW(1575) & ChrW(1586) & _
+        ChrW(1576) & ChrW(1740) & ChrW(1606) & ChrW(1740) & " = "
      Selection.TypeParagraph
-     Selection.TypeText Text:=" | ØªÚ©Ù…ÛŒÙ„ = "
+     Selection.TypeText Text:=" | " & ChrW(1578) & ChrW(1705) & ChrW(1605) & ChrW _
+        (1740) & ChrW(1604) & " = "
      Selection.TypeParagraph
      Selection.TypeText Text:="}}"
@@ خط ۸۲۱: / خط ۸۳۳: @@
      Selection.Find.Execute Replace:=wdReplaceAll
      Application.Keyboard (1065)
 End Sub
 </pre>