Posts by Mar7872

    Hi !


    I would like export the file to xlsx with embedded photos directly in the file. At this point, the file is exported to xlsx but when i open this file in another pc ,photos are not displayed.




    The current code responsible for export to xlsx:

    Code
    1. Application.DisplayAlerts = False
    2. ActiveWorkbook.Sheets("ASORTYMENT").Copy
    3. ActiveWorkbook.SaveAs Filename:="C:\Autokosmet\" & "testing", FileFormat:=51, CreateBackup:=False
    4. ActiveWorkbook.Close
    5. Application.DisplayAlerts = True



    FULL CODE which is designed to pair the table rows with photos ( they are in local folder).

    Please look below

    Hello !


    i need help modifying the code below. the code only lacks the centering of the photo in the cells, the rest works smoothly. The width and height of the cell is set earlier.
    Thx for help!

    Hello,


    Maybe someone can help me with the condition below . Thx for help.



    Code
    1. Dim cell As Range
    2. For Each cell In Range("query1[Column5]")
    3. If cell.Value =1 then...
    4. 'copy cell from Column2 and paste it into Column1. all on the same line where the condition is currently being checked. If the cell does not meet the condition, leave it as is and move to the next row
    5. end IF
    6. next cell