הוסף שורה ב VBA

[miamorj]

הוסף שורה ב VBA

הי. יש לי אופיס 365 ומערכת הפעלה 10
אני רוצה להוסיף שורה לקובץ לפי בקשת המשתמש כאשר הוא יספק לי את מספר השורה שמעליה/מתחתיה ירצה להוסיף וכן את מספר השורות שירצה להוסיף.
מצאתי את הקוד הזה לדוגמא
Rows("3:5").Insert Shift:=xlDown (יש עוד המשך..)

הבעייה היא שאני לא יודעת איך להחליף את המספרים לקלט מהמשתמש. כלומר כמו Rows("i:j") exm רק שזה לא הסינטקס הנכון

אשמח לעזרה.
תודה

 

[ziv98]

ככה

i = 3
j = 5

Rows(i & ":" & j).Insert Shift:=xlDown

 

[miamorj]

סכום תאים ממשתמש

הי,
תודה על התשובה.
האם יש אפשרות לשתול לתוך תא נוסחאת SUM כאשר הטווח מסופק ע"י המשתמש
ActiveCell.FormulaR1C1 = "=SUM(R[352]:R[461])"
תודה!

 

[ziv98]

אותו רעיון

אתה צריך לשרשר מחרוזת.
עדיף בלי RC (לטעמי)

i = 2
j = 5
ActiveCell.Formula = "=SUM(B" & i & ":B" & j & ")"