PDA

View Full Version : سوال: ساخت منو برای اکسل 2007



mobinsaffarpour
چهارشنبه 24 تیر 1394, 15:06 عصر
سلام دوستان وقت بخیر

من میخوام یک سری از دستورات رو که توی اکسل درست میکنم. با VB.NET یک منو به اکسل اضافه کنم و دستورات رو از اون طریق اجرا کنم . با روش ساخت Ribbon آشنا هستم . اما نمیدونم بعنوان مثال کد ذیل رو چطوری باید بکار ببرم تا بخوام اجراش کنم .







Sub AlaphabetArabic()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Name = Replace(ws.Name, ChrW(1610), ChrW(1740), vbTextCompare)
ws.Name = Replace(ws.Name, ChrW(1603), ChrW(1705), vbTextCompare)
Next ws
Cells.Replace What:=ChrW(1610), Replacement:=ChrW(1740), LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:=ChrW(1603), Replacement:=ChrW(1705), LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End Sub

mobinsaffarpour
پنج شنبه 25 تیر 1394, 08:39 صبح
چرا کسی جواب نمیده ؟ ؟ ؟