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

Application.CopyObjectsWithCells = False

ולא נשכח להדליק אותה חזרה בסיום הפעולה, כך:

Application.CopyObjectsWithCells = True

אז מה בעצם העושה הפקודה?

אומרת לאקסל שלא להעתיק אובייקטים, בעת ביצוע פעולת ההעתקה.
אובייקט יכול להיות גרף, תמונה, כפתור, פקד טופס, פקד ActiveX, תמונה שהוספנו, SmartArt
ובעצם, כל גרפיקה שהוספנו לגיליון.

בואו נראה דוגמה:

אני מעוניינת להעתיק את נתוני גיליון 1 לגיליון 2, ללא הגרפיקה:

Application.CopyObjectsWithCells = False

Cells.Copy Sheets(2).Range("a1")

Application.CopyObjectsWithCells = True

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

נסו ותהנו (: