[VB6] Migrare da VBA di Excel a Visual Basic 6

[Magicolotto]

ciao ragazzi ho un foglio excell ed uso questa macro per colorare le celle dopo una ricerca :

 For Riga = 2 To 95
        For Colonna = 2 To 51
            If Numero = Cells(Riga, Colonna) Then
                Cells(Riga, Colonna).Interior.Color = vbYellow
                Indovinato = Indovinato + 1
            Else
                If I = 5 Then
                    Cells(Riga, Colonna).Interior.Color = vbRed
                Else
                End If
            End If
        
        Next Colonna
    Next Riga

NEL MIO PROGeTTO VB6 utilizzo una MSHFlexGrid

se possibile vorrei trasformare quel codice in vb6...

ma nn ci sto riuscendo


piccolo aiuto ??????

[alka]

Quando si scrive non ci sto riuscendo si dovrebbe anche fornire qualche indicazione in più sul problema che si sta riscontrando, in modo da ottenere indicazioni ben precise.

[Magicolotto]

ho cercato di trasformarla cosi :

numero = 90
Indovinato = 0
For id = 7600 To datPrimaryRS.RecordCount
For cols = 2 To 51
If numero = cells(id, cols) Then
cells(id, cols).Interior.Color = vbYellow
Indovinato = Indovinato + 1
Else
If I = 5 Then
cells(id, cols).Interior.Color = vbRed
Else
End If
End If

Next cols
Next id

ma senza successo



volevo una mano

[alka]

Originariamente inviato da Magicolotto
ma senza successo

"Ma senza successo" è sinonimo di "non ci sto riuscendo"...

Semplifico la mia domanda: che errore ti dà? cosa succede? in che modo il risultato è diverso da quello atteso?

A parte tutto, trovo che sia difficile che tu possa trasportare in questo modo il codice VBA all'interno di VB6 e pretendere che funzioni in modo schietto: nel primo caso, stai lavorando in un contesto che prevede un significato per un determinato identificatore come Cells, che ovviamente non ha senso in VB6 a meno che non venga applicato ad un oggetto specifico, ricreando il medesimo contesto.

Voglio dire, se porti il codice in VB6 e da nessuna parte hai un qualsivoglia riferimento al foglio Excel, come fa VB6 a sapere su quale file, cartella o foglio di lavoro Excel vuoi operare? :master:

[Magicolotto]

come dicevo sopra lavoro in una MSHFlexgrid

dovrei colorare le celle tramite codice

in excell uso :

Cells(Riga, Colonna).Interior.Color = vbRed


ma in vb6?

[chico62]

Basta spulciare tra le proprietà della MSHFlexGrid sulla guida in linea (Tasto F1) per avere lumi...
(RTFM)

Chico

[Magicolotto]

quale parte della proprieta è??
credo che sia
CellBackColor


ma io vorrei.... impostare anche la ricerca

[Magicolotto]

dovrei impostare dei contatori su .row e -col
in modo da poi usare il cellbackcolor

ma non riesco una mano ?