Esportazione in formato JPG

Question

Ciao a tutti,

esiste il codice VBA per esportare (salvando quindi direttamente da excel) una range di celle in file di formato .JPG?

Grazie

Sergiovery

Answer 1

Ciao Mauro,

Recitava un famoso adagio"piuttosto che niente...meglio piuttosto!"

Se esiste qualcosa per esportare in .PDF cercherò di adattare la procedura a questo formato.

Grazie

Sergiovery

Excel 2007/2010 con gli ultimi SP:

Public Sub m()

    Dim sPath As String

    Dim sNome As String

    Dim lng As Long

    Application.DisplayAlerts = False

    On Error Resume Next

    With ThisWorkbook

        lng = InStr(.Name, ".")

        sPath = .Path

        sNome = Mid(.Name, 1, lng - 1)

        .Worksheets("Foglio1").ExportAsFixedFormat _

            Type:=xlTypePDF, _

            Filename:=sPath & "" & sNome, _

            Quality:=xlQualityStandard, _

            IncludeDocProperties:=True, _

            IgnorePrintAreas:=False, _

            OpenAfterPublish:=False

    End With

    Application.DisplayAlerts = True

End Sub

Qui considero che il file di Excel sia già salvato e do al file .pdf lo stesso nome. Altrimenti devi gestire la cosa. Fai sapere, grazie.

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/

Answer 2

Ottimo!

(Come sempre)

Saluti

Sergiovery

Grazie per il riscontro. Buon lavoro.

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/

Answer 3

Ottimo!

(Come sempre)

Saluti

Sergiovery

Answer 4

Ciao Mauro,

Recitava un famoso adagio"piuttosto che niente...meglio piuttosto!"

Se esiste qualcosa per esportare in .PDF cercherò di adattare la procedura a questo formato.

Grazie

Sergiovery

Answer 5

Ciao a tutti,

esiste il codice VBA per esportare (salvando quindi direttamente da excel) una range di celle in file di formato .JPG?

Non credo. In .pdf, no?

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/