הכפל את כל ערכי Excel בקבוע

כיצד להכפיל את כל התאים בטווח בקבוע

האם ברצונך לוודא שכל הקבועים בטווח יוכפלו בפקטור? אתה יכול להשיג זאת על ידי שימוש חכם בפונקציה EDIT - INSERT CONTENT.

קל יותר אם אתה משתמש במאקרו הבא:

השתמש בגורם משנה ()
עמום תא כטווח
ערך קלט עמום כל עוד
ערך קלט = InputBox ("אנא הזן את הגורם (למשל 100)")
לכל תא שנבחר
אם לא (Cell.HasFormula) אז
Cell.Formula = "=" & Cell.Value & "*" & Val (ערך קלט)
סוף אם
התא הבא
סיום תת

בשלב הראשון, בחר טווח תאים בטבלה. האיור הבא מציג דוגמה לאזור המודגש.

לאחר מכן התקשר למאקרו. כעת Excel מבקש בחלון את הגורם שבו ברצונך להשתמש. האיור הבא מציג חלון זה:

אשר את הגדרת הגורם בלחצן אישור.

Excel עובר כעת בין כל התאים שבחירה. רק התאים שבהם אין נוסחה משתנים. הם מוכפלים בגורם שהוזן. Excel מזין את הערך החדש כנוסחה בתא. האיור הבא מראה כיצד התוצאה יכולה להיראות:

אם ברצונך להזין את המספרים כקבועים, החלף את השורה "Cell.Formula" בביטוי הבא:

Cell.Value = Cell.Value * Val (ערך קלט)

על ידי הזנת גורם פחות מאחד, ניתן גם לחלק את התאים בקבוע.

המרת נוסחה לקבוע באמצעות מאקרו: כיצד להמיר חישוב באמצעות VBA לערך מוחלט

אתה רוצה להמיר את התאים בטווח לערכים מוחלטים. אתה יכול לעשות זאת באופן אינטראקטיבי על ידי העתקת האזור ולאחר מכן הדבקתו כערכים. הפקודה המתאימה נקראת "ערוך - הדבק מיוחד" ב- Excel עד גירסה 2003 ו"התחל - הדבק - הדבק מיוחד "ב- Excel מגרסה 2007.

אם ברצונך להמיר תאים בודדים במאקרו, קוד התוכנית הבא יעזור לך:

SubValueConvert ()
עם ActiveSheet.Range ("a1")
.Formula = .Value
סיים עם
סיום תת

המאקרו ממיר את התוכן הנוכחי של תא A1 בטבלה הפעילה לערך מוחלט.

תוכל לעזור בפיתוח האתר, שיתוף הדף עם החברים שלך

wave wave wave wave wave