[VB6] & Creazione bordi excell

[TheSpoiler]

salve raga..un aiuto...
una volta interfacciato excel con vb6 (tramite il riferimento)..come faccio a selezionare un range di celle,creargli un bordo, e mettergli un colore di sfondo?
grazie a tutti!

[TheSpoiler]

per colorarli prima ho selezionato tramite la proprieta .select e poi successivamente con la proprieta .interior.colorindex = 41 (41 è il codice di un colore)

[Giulio C.]

Ciao.
Per poter effettuare correttamente queste operazioni, credo che il miglior sistema, secondo me, consiste nel registrare una macro con le operazioni da te desiderate che quindi farai prima manualmente.

Al termine di queste, premi e tieni premuto "ALT" e poi F11 ed ottieni la visualizzazione del Visual Basic Editor dal quale potrai consultare il codice della macro appena creata.

Lo stesso codice, con piccole modifiche di sintassi, puoi utilizzarlo nel tuo programma in VB.

Fammi sapere se hai bisogno di ulteriori chiarimenti.

[TheSpoiler]

si ne avrei bisogno...non so neanke da dove cominciare!
Ti prego! Grazie!

[Giulio C.]

Ciao.
Sono lieto di poterti dare una mano.
Procedi dunque così:

- apri un foglio vuoto di Excel;
- Vai su Strumenti, seleziona la voce "Macro" e dal menù che ti comparirà, scegli "Registra Nuova Macro";
- Dai un nome nella casella che ti verrà proposta e clicca su OK;

A questo punto esegui sul foglio vuoto di Excel le operazioni che citavi nel tuo primo messaggio e cioè selezionare un gruppo di celle, dargli un bordo e dargli un colore di riempimento.

Fatto questo, torna su Strumenti, vai di nuovo alla voce Macro e clicca sul menù che ti comparirà su "Interrompi registrazione".

Ora, sempre con il foglio di Excel in primo piano, premi e tieni premuto ALT e poi F11. Ti comparirà una nuova finestra che è il VBA Editor.

Sulla sinistra di questa finestra, recati sulla voce "Moduli" che avrà una sottovoce "Modulo"; fai un doppio click sinistro su questa voce. Comparirà sulla destra il codice relativo alla macro da te registrata.

Il tuo compito adesso sarà quello di copiare il codice che vedrai ed adattarlo ed al tuo programma con le variazioni necessarie.

Ad ogni buon conto, di seguito, ti posto il codice generato da una macro di prova che ho effettuato. Nell'esempio, evidenzio le celle dell'intervallo "E2:G12", gli metto un bordo nero intorno e le riempio con un celeste chiaro.

Ecco il codice VBA generato dalla MACRO:

Option Explicit

Sub Macro1()
'
' Macro1 Macro
' Macro registrata il 26/01/2005 da Administrator
'

'
    Range("E2:G12").Select
    Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    With Selection.Borders(xlEdgeLeft)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeTop)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeBottom)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    With Selection.Borders(xlEdgeRight)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = xlAutomatic
    End With
    Selection.Borders(xlInsideVertical).LineStyle = xlNone
    Selection.Borders(xlInsideHorizontal).LineStyle = xlNone
    With Selection.Interior
        .ColorIndex = 34
        .Pattern = xlSolid
    End With
    Range("I12").Select
End Sub

Buon lavoro dunque e fammi sapere qualcosa.

[TheSpoiler]

Ci sono riuscito!! Grazie!!
In effetti cosi e molto piu facile e subito sono riuscito a vedere le proprieta degli oggetti.
Ti ringrazio tantissimo!

[Giulio C.]

Di nulla! Siamo qui tutti per aiutarci no?