Risultati da 1 a 8 di 8

Discussione: Inserimento foto in automatico



  1. #1
    L'avatar di rocanni
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Messaggi
    2
    Likes ricevuti
    0
    Likes dati
    0

    Inserimento foto in automatico

    Ciao,
    ho la necessita' di inserire foto in automatico in un foglio di excel,non sempre in tutte le righe vicine ma anche saltando 2 tre righe , su internet ho trovato questa macro .Si puo' modificare per il mio scopo?:187:
    Grazie per l'aiuto

    Sub InsImg()
    Application.ScreenUpdating = False
    ActiveSheet.Shapes.SelectAll
    Selection.Delete
    mPath = ActiveWorkbook.Path
    r = 2 ' riga inizio prodotti
    Lr = Range("A" & Rows.Count).End(xlUp).Row ' ultima riga da analizzare
    For i = r To Lr
    mFoto = Cells(i, 1)

    If Len(mFoto & "") <> 0 Then ' se c'e' il nome prodotto
    If Dir(mPath & "\" & mFoto & ".jpg") <> "" Then ' se la foto esiste
    ' inserisce foto e adatta a dimensioni cella/colonna B
    With ActiveSheet.Pictures.Insert(mPath & "\" & mFoto & ".jpg")
    'NOTA: in blu per centrare la foto nelle celle (puoi ovviamente variare), altrimenti vengono una attaccata all'altra
    .Top = Range("B" & i).Top + 5
    .Left = Range("B" & i).Left + 5
    .Height = Range("B" & i).Height - 10
    .Width = Range("B" & i).Width - 10
    End With
    End If
    End If
    Next i
    Application.ScreenUpdating = True
    End Sub

  2. #2
    L'avatar di Ste
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Brescia
    Età
    16
    Messaggi
    250
    Versione Office
    2016 PC
    Likes ricevuti
    4
    Likes dati
    19
    Ciao Rocanni benvenuto sul forum!

    Ho capito cosa ti serve ma potrebbe darsi che non ti serve necessariamente una macro..

    Potresti gentilmente allegare un file?

    Ciao!

  3. #3
    L'avatar di rocanni
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Messaggi
    2
    Likes ricevuti
    0
    Likes dati
    0

    inserimento foto in automatico

    Ciao Ste,
    il allegato il mio catalogo
    Grazie
    Ultima modifica fatta da:Gerardo Zuccalà; 25/10/15 alle 09:49

  4. #4
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4920
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1127
    Citazione Originariamente Scritto da rocanni Visualizza Messaggio
    Ciao Ste,
    il allegato il mio catalogoAllegato 218
    Grazie
    Ciao Rocanni
    Grazie per la domanda e benvenuto tra di noi
    Rocanni quando hai un po di tempo dai una occhiata agli annunci dello Staff, li troverai dei video tutorial che ti potrebbero essere utili, infatti in un video tutorial vedrai come inserire un allegato nella maniera corretta
    http://www.forumexcel.it/forum/2-ann...taff-del-forum
    ciao

  5. #5
    L'avatar di Ste
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Brescia
    Età
    16
    Messaggi
    250
    Versione Office
    2016 PC
    Likes ricevuti
    4
    Likes dati
    19
    MI permetto di segnalarti questo video del fondatore.. guardalo tutto può aiutarti molto
    https://m.youtube.com/watch?list=PLm...;v=4Q-WWyzNUYA


    Saluti
    Ultima modifica fatta da:Gerardo Zuccalà; 11/07/15 alle 17:33
    Se non credi in te stesso, nessuno lo farà per te. - Kobe Bryant

  6. #6
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4920
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1127
    Ciao Ste
    Grazie per aver linkato un video
    Tuttavia mi sono permesso di modificare il tuo ultimo post per far vedere la miniatura del video
    ti consiglio di incollare la URL del video cliccando questa piccola icona e Booom! il gioco è fatto
    Ciao Ste


  7. #7
    L'avatar di Ste
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Brescia
    Età
    16
    Messaggi
    250
    Versione Office
    2016 PC
    Likes ricevuti
    4
    Likes dati
    19
    Citazione Originariamente Scritto da Gerardo Zuccalà Visualizza Messaggio
    Ciao Ste
    Grazie per aver linkato un video
    Tuttavia mi sono permesso di modificare il tuo ultimo post per far vedere la miniatura del video
    ti consiglio di incollare la URL del video cliccando questa piccola icona e Booom! il gioco è fatto
    Ciao Ste

    I tuoi consigli sono sempre apprezzati! Arrivederci!!
    Se non credi in te stesso, nessuno lo farà per te. - Kobe Bryant

  8. #8
    L'avatar di zio_tom
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Veneto
    Messaggi
    526
    Versione Office
    2010 - Win10
    Likes ricevuti
    64
    Likes dati
    17
    tornado IT

    x rocanni
    non stai chiedendo consigli, condividendo esperienze, risolvere problemi
    vuoi della manovalanza per adattare una Sub trovata, alle tue esigenze!!!
    ti do lo stesso alcune dritte
    basta inserire 'step' nel ciclo 'for' ed annidare altro ciclo 'for' per le colonne
    come sono inseriti i dati l'ultima riga va rielaborata

    in ogni caso la fatica di inserire il nome del file foto e quasi pari ad inserire la foto

    PS: oltre a questi 2 post.... più nulla!!!

Discussioni Simili

  1. inserimento automatico dati
    Di mapero nel forum Domande su Excel in generale
    Risposte: 20
    Ultimo Messaggio: 19/11/16, 12:24
  2. inserimento foto su listino prezzi in excel
    Di salvoplac53 nel forum Domande su Excel VBA e MACRO
    Risposte: 11
    Ultimo Messaggio: 20/10/16, 21:03
  3. [Risolto] Inserimento/richiamo automatico dati dopo inserimento voce da elenco
    Di Lithio nel forum Domande su Excel in generale
    Risposte: 10
    Ultimo Messaggio: 17/09/16, 15:40
  4. Inserimento dati in automatico
    Di Rosaria79 nel forum Domande su Excel VBA e MACRO
    Risposte: 16
    Ultimo Messaggio: 12/06/16, 14:28
  5. ComboBox: inserimento automatico
    Di wildstar nel forum Domande su Excel VBA e MACRO
    Risposte: 3
    Ultimo Messaggio: 21/03/16, 17:02

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •