how about importing the image in column A and the corresponding title in column B?
@salamonlaszlolibrarian10 ай бұрын
how to do with subfolders included?
@VickyKumar-eq7lx2 жыл бұрын
👌👌
@sayedAhmed-q2c Жыл бұрын
Thank you boss❤❤❤❤
@ExpertWorld18 Жыл бұрын
Welcome
@lifejourney41512 жыл бұрын
Nice
@ExpertWorld182 жыл бұрын
Thanks
@henvelarde Жыл бұрын
Thanks for this video and code. It really works but I was wondering, if I may ask: How could it be that the files get inserted as object instead of picture format? I'm asking this since if you insert as image and gets adjusted to the cell, then whenever you enlarge the file, it gets blurry. Thanks in advance!
@TILAKRAJ-ri8ul8 ай бұрын
Next sheet mai formula se usth sakti hh kya
@DimitriosMavroeidis Жыл бұрын
Thank you!!!
@MohAboAbdo Жыл бұрын
Thank you so much
@ExpertWorld18 Жыл бұрын
You're most welcome
@jatinlad4491 Жыл бұрын
Not working on mac OS SONOMA
@asr6322 жыл бұрын
Bhai music off karo or voice apni badhao bina ear phones ke apki vdo bilkul bhi sunai ni deti but vdo ne mera bahut bada trouble khatm kar diya thanks
@ExpertWorld182 жыл бұрын
Bhai abhi sound krna thoda muskil hai. But next time iska dhyan rakhuga
@deepakgupta19038 ай бұрын
Sir mere pas bahut sari photos h mujhe unhe nine images leni h per a4 size paper par or sari photos nikalni h nine nine karke or photo ke upar uska name bhi aa jaye header or footer ki jagah ho
@bahar.fashionbuyer Жыл бұрын
Hi , dose any one can do this, i try several time and I couldn’t
@ExpertWorld18 Жыл бұрын
How can I help you?
@neelamkumari22152 жыл бұрын
Sir ok but i want it in row that how tell
@ExpertWorld182 жыл бұрын
Please download it. copy and paste in module. drive.google.com/file/d/1gsfQddqAfSDqQ1DvLUCAAysA0LAnf06k/view?usp=sharing
@privaldo972 жыл бұрын
Can't access file
@ExpertWorld18 Жыл бұрын
Sub InsertPictures() Dim PicList() As Variant Dim PicFormat As String Dim Rng As Range Dim sShape As Shape On Error Resume Next PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True) xcolIndex = Application.ActiveCell.Column If IsArray(PicList) Then xRowIndex = Application.ActiveCell.Row For lLoop = LBound(PicList) To UBound(PicList) Set Rng = Cells(xRowIndex, xcolIndex) Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height) xcolIndex = xcolIndex + 1 Next End If End Sub
@RahulSingh-rx6hlАй бұрын
Code kaha h
@abhishakya5263 Жыл бұрын
Emp code ke hisab se import karna ho toh
@ExpertWorld18 Жыл бұрын
Emp code ke hisab se images rename krni padegi, fir macro run kr skte ho
@abhishakya5263 Жыл бұрын
@@ExpertWorld18 thanks
@Ifrahirfan972 жыл бұрын
please send me code
@ExpertWorld182 жыл бұрын
Link given in description box
@manorjangid Жыл бұрын
@@ExpertWorld18 link not working
@sangeetarai3202 жыл бұрын
Audio bahut kam hai kuch samajh me nahi ata , aap log aise vdo bante hi kyun hai.