اينطور كه فهميدم، شما ميخوايد به ابتداي تمام خانه هاي يك ستون از WorkSheet عبارت "=" اضافه شده و عدد آن خانه ها بر اساس فرمول بعد از عبارت "=" محاسبه گردد.
متاسفانه براي اين كار، راه آساني سراغ ندارم. اما اگر تمام خانه ها در يك ستون و زيرهم هستند، مي توانيد مراحل زير را طي كنيد، آنگاه با كليك كردن روي اولين خانه ي آن ستون و نگه داشتن دكمه هاي Ctrl+e عبارت "=" به تمام خانه ها اضافه شده و مقدار آنها بر اساس فرمول موجود، محاسبه مي شود. (همان چيزي كه دنبالش بوديد):
1- فايل خود را با نام ديگري (مثلاً Book2) ذخيره كنيد. تا در صورت بروز مشكل، آن را از دست ندهيد.
2- روي گزينه هاي زير به ترتيب كليك كنيدۀ
Tools> Macros> Record New Macro
3- در قسمت Shortcut key، در خانه ي جلوي "+Ctrl" كليك كرده و حرف e را وارد نمائيد. بعد هم روي دكمهOK كليك كنيد.
4- جلوي شما يك Toolbarظاهر مي شود كه يك دكمه به شكل مربع توپر دارد (دكمه ي StopRecord). همان دكمه را فشار دهيد و مراحل زير را طي نمائيد:
Tools> Options> Macros> Macros> Edit
5- پنجره ي ويژوال بيسيك در جلوي شما ظاهر مي شود. در خط اول، عبارت "()Sub Macro1" و در خط آخر "End Sub" را مي بينيد. بين "()SubMacro1" و "End Sub" اين دو خط نوشته را اضافه كنيد:
Selection.FormulaR1C1 = "=" & ActiveCell.Value
ActiveCell.Offset(1, 0).Range("A1").Select
6- حالا روي گزينه
File> Save
كليك كنيد. و از پنجره ويژوال بيسيك خارج شويد.
اكنون با كليك كردن روي اولين خانه ستون مربوطه و نگه داشتن دكمه هاي Ctrl+e همان اتفاقي كه مي خواهيد، مي افتد. اگر هم داده هاي شما به جاي اين كه در يك ستون زير هم باشند، در يك رديف، كنار همند، بايد در فرمول بالا به جاي عبارت (1,0) عبارت (0,1) را بنويسيد.
اگر گيج شديد، عذرخواهي مي كنم. راه بهتري سراغ نداشتم.