نحوه غیرفعال کردن Pop-Up Blocker در Google Chrome، Safari و Edge
همه مرورگرهای وب محبوب در همه پلتفرمها دارای یک مسدودکننده پاپ آپ داخلی هستند. آنها معمولاً به اندازه کافی باهوش هستند تا پنجره های پاپ آپ ناخواسته را مسدود کنند
شما به راحتی می توانید تصاویر را در صفحات گسترده اکسل قرار دهید و آنها را با کد ماکرو ویرایش کنید. در اینجا نحوه درج یک عکس در یک سلول با استفاده از VBA در اکسل آورده شده است .
Visual Basic for Applications که به اختصار VBA نامیده می شود، شکلی از ویژوال بیسیک 6 است که در برنامه های مایکروسافت آفیس ادغام شده است. از طریق کدنویسی، VBA به شما امکان می دهد وظایف را در برنامه های آفیس، از جمله اکسل، خودکار کنید. در برخی موارد، حتی می توانید با استفاده از VBA ویژگی های جدیدی را به Excel اضافه کنید.
حتی اگر برای استفاده از VBA باید با کد کار کنید، این به این معنی نیست که VBA پر از حروف و اعداد است. با VBA در اکسل، میتوانید یک ماکرو ایجاد کنید که به شما امکان میدهد یک تصویر را در یک سلول یا محدوده سلولی وارد کنید. در اینجا چیزی است که شما باید در مورد درج تصاویر در سلول های اکسل با استفاده از VBA بدانید.
نحوه درج تصاویر در سلول ها با استفاده از VBA در اکسل
برای ایجاد یک ماکرو که یک تصویر را با استفاده از VBA در سلول اکسل قرار می دهد، واقعاً به دانش پیشرفته ویژوال بیسیک نیاز ندارید. تنها کاری که باید انجام دهید این است که ابزارهای Developer را روشن کنید، یک ماکرو ایجاد کنید و کد مناسب را جایگذاری کنید. البته می توانید تصاویر را بدون استفاده از VBA نیز در اکسل قرار دهید. با این حال، در این مقاله به VBA می پردازیم.
برای استفاده از VBA در اکسل، باید ابزار Developer را فعال کنید. این عمل زبانه Developer را در نوار فعال می کند که به طور پیش فرض غیرفعال است.
اکنون ابزارهای توسعه دهنده، از جمله دسترسی به VBA، فعال هستند. لازم نیست هر بار که می خواهید از VBA در اکسل استفاده کنید این کار را انجام دهید. ابزارهای برنامه نویس همیشه فعال خواهند بود تا زمانی که آنها را غیرفعال کنید.
پس از کلیک بر روی Create، پنجره VBA باز می شود و کد ماکرو شما را نمایش می دهد. در حال حاضر، کد از 2 خط تشکیل شده است: یک Sub برای شروع ماکرو و یک End Sub برای پایان دادن به آن.
یک کد کوچک به این ماکرو اضافه کنید. خط کد زیر را بین دو خط اضافه کنید:
Dim photoNameAndPath As Variant
Dim photo As Picture
photoNameAndPath = Application.GetOpenFilename(Title:="Select Photo to Insert")
If photoNameAndPath = False Then Exit Sub
Set photo = ActiveSheet.Pictures.Insert(photoNameAndPath)
With photo
.Left = ActiveSheet.Range("A1").Left
.Top = ActiveSheet.Range("A1").Top
.Width = ActiveSheet.Range("A1").Width
.Height = ActiveSheet.Range("A1").Height
.Placement = 1
End With
کد نهایی به شکل زیر خواهد بود:
لازم نیست نگران ذخیره این فرآیند باشید. هر تغییری که در VBA ایجاد می کنید بلافاصله ذخیره می شود.
حالا وقت آن است که کد را در عمل ببینید:
اکنون پیامی باز می شود که از شما می خواهد فایل تصویری را که می خواهید درج کنید پیدا کنید. عکس را انتخاب کنید، سپس روی Open کلیک کنید. اکنون تصویر را در سلول A1 خواهید دید.
توجه داشته باشید، اکسل تصویر را کوچک می کند تا در سلول A1 قرار گیرد. میتوانید آن را تغییر دهید و کد را برای درج تصاویر در سلولهای دیگر، حتی طیف وسیعی از سلولها، تغییر دهید. در قسمت بعدی کد را جدا کرده و پارامترها را توضیح می دهیم.
برای اینکه کد VBA همانطور که می خواهید کار کند، باید آن را درک کنید. هنگام انجام این کار، می توانید کد را تغییر دهید تا تصاویر را در هر سلولی با هر اندازه ای وارد کنید.
Sub insertPhotoMacro()
Dim photoNameAndPath As Variant
Dim photo As Picture
photoNameAndPath = Application.GetOpenFilename(Title:="Select Photo to Insert")
If photoNameAndPath = False Then Exit Sub
Set photo = ActiveSheet.Pictures.Insert(photoNameAndPath)
With photo
.Left = ActiveSheet.Range("A1").Left
.Top = ActiveSheet.Range("A1").Top
.Width = ActiveSheet.Range("A1").Width
.Height = ActiveSheet.Range("A1").Height
.Placement = 1
End With
End Sub
هنگامی که کد شروع می شود، از دستور Dim برای تعیین نوع متغیر استفاده می شود. ما دو نوع متغیر داریم: photoNameAndPath و photo . ابتدا متغیر و سپس تصویر.
از آنجا، متغیر photoNameAndPath اجرا می شود و برنامه ای را برای دریافت محل فایل عکس باز می کند. این کار از طریق Application.GetOpenFileName انجام می شود . پارامتر عنوان اختیاری است. محتوای داخل آن به عنوان نام پنجره نمایش داده می شود.
با استفاده از If photoNameAndPath = False سپس Exit Sub ، اگر آدرس نامعتبر یا خالی داده شود، فرآیند پایان می یابد. با این حال، اگر یک فایل مناسب ارائه شود، Set photo = ActiveSheet.Pictures.Insert(photoNameAndPath) نشان می دهد که تصویر باید به عنوان یک متغیر همانطور که در ابتدا تعریف شده است تنظیم شود. در کاربرگ فعال درج خواهد شد.
در نهایت از With photo و 5 خط بعد از آن برای تعیین محل عکس استفاده کنید. Left و .Top به موقعیت شروع اشاره دارند، در حالی که .Width و .Height به موقعیت پایانی اشاره دارند. اگر قصد درج تصاویر را در سلول یا محدوده دیگری دارید، این خطوطی هستند که باید تغییر دهید.
.Placement نشان می دهد که اندازه تصویر باید به تناسب سلول تغییر کند یا شکل آزاد درج شود. با تنظیم آن بر روی 1 ، اندازه آن مطابق با سلول تغییر می کند.
در نهایت کد بالا از End With و سپس End Sub برای بستن ماکرو استفاده می کند. اکنون می توانید متغیرهای photoNameAndPath و photo را به هر نام دیگری که دوست دارید تغییر دهید. فقط به یاد داشته باشید که نام ها را در سراسر کد ثابت نگه دارید.
در بالا نحوه استفاده از VBA برای درج تصاویر در سلول های اکسل آمده است . امیدوارم مقاله برای شما مفید باشد.
همه مرورگرهای وب محبوب در همه پلتفرمها دارای یک مسدودکننده پاپ آپ داخلی هستند. آنها معمولاً به اندازه کافی باهوش هستند تا پنجره های پاپ آپ ناخواسته را مسدود کنند
برنامه Electronic Arts (EA) در ویندوز مقصد اصلی شما برای دسترسی به بازی های مورد علاقه شما است. و بنابراین، می تواند بسیار خسته کننده شود زمانی که
همه مشکلات مربوط به پیدا کردن تاریخ انتشار یا راه اندازی وب سایت ها را داشتند. برخی باید تاریخ های منتشر شده برای یک مقاله مدرسه را بدست آورند، در حالی که
چه در حال آپلود موسیقی خود باشید یا یک لیست پخش عالی را برای تمرین انتخاب کنید، اثر هنری روی جلد لیست پخش شما اولین چیزی است که سایر SoundCloud ها دارند.
اگر تا به حال خود را در پایان یک حمله Minecraft پیدا کرده اید و به دنبال آخرین مهاجم برای حذف هستید، تنها نیستید. بسیاری از بازیکنان این شرایط را داشته اند
جاوا اسکریپت یکی از قدرتمندترین دینام های پشت وب تعاملی است. این زبان برنامه نویسی به صفحات وب اجازه می دهد تا به اقدامات شما در زمان واقعی پاسخ دهند.
تلویزیون های هایسنس یکی از بهترین تلویزیون های ROKU در بازار هستند. اما، گاهی اوقات ممکن است هنگام تلاش با یک اعلان کد خطا 014.50 در تلویزیون خود مواجه شوید
تلاش برای مدیریت ریموت ها در سال 2024 مانند تلاش برای رسیدگی به صورت حساب ها است. خوشبختانه، اگر از Fire Stick برای پخش برنامه های مورد علاقه خود استفاده می کنید و
از آنجایی که تلفنهای اپل فقط با مقدار مشخصی از حافظه داخلی عرضه میشوند که قابل افزایش نیست، ممکن است به سرعت فضای شما تمام شود. در یک نقطه، شما ممکن است
هایسنس در زمینه فناوری تلویزیون های هوشمند به یک برند محبوب تبدیل شده است. آنها واحدهای LED و ULED (Ultra LED) مقرون به صرفه را تولید می کنند
راهنمای کامل برای خرید یا تجارت هدلس هد انحصاری که به دلیل جلوه تزئینی منحصر به فردش شناخته شده است در روبولوکس.
در هنگام ثبت نام در تلگرام باید یک شماره تلفن به مشخصات شخصی خود اضافه کنید. اگر کنجکاو هستید که شخص دیگری را تأیید کنید
نحوه تبدیل Amazon Echo Show خود را به قاب عکس دیجیتال با Amazon Photos در این راهنما کشف کنید.
فرم سفارش آنلاین به کسب و کارها کمک می کند تا بدون دردسر از مشتریان خود سفارش بگیرند. با یک فرم سفارش، مشتریان می توانند برای محصولات سفارش داده، سفارش دهند
آیا نمی دانید که چگونه می توانید برای سفارش DoorDash خود بازپرداخت کنید؟ همه راههایی را که میتوانید بازپرداخت دریافت کنید، جدول زمانی بازپرداخت و موارد دیگر را بررسی کنید.
برچسبها ویژگیهای ضروری Google Maps هستند که به ما کمک میکنند مکانها را به راحتی پیدا کنیم. با این حال، یک نقشه پر از سنجاق و پرچم به هر کجا که نگاه کنید می تواند باشد
ویدیوها با موسیقی متن بسیار سرگرم کننده تر هستند. چه اضافه کردن موسیقی حالت برای جذب مخاطب یا قرار دادن جلوه های صوتی در بالای یک ویدیو، Canva
شما به هر دلیلی شماره تلفن خود را تغییر دادید. این یک تصمیم بزرگ است، به خصوص اگر برای مدتی این شماره را داشته باشید. اما این تغییر خواهد شد
ایمیل مارکتینگ انبوه می تواند با ارسال یک کمپین ایمیل به تعداد زیادی از گیرندگان به طور همزمان در زمان شما صرفه جویی زیادی کند. این یک
آیا از رسیدگی به مشکلات حافظه کم سیستم در تلویزیون هایسنس خود خسته شده اید؟ در اینجا چند راه حل کاری برای رفع این مشکل وجود دارد.