[Excel] sostituire una cella vuota

[shambler1]

Ho un enorme foglio costituito da una mega query tradotta da Access ad Excel e devo sostituire con una procedura, il valore vuoto con una stringa di testo. Come posso fare? sono oltre 100 colonne.
Da VB?

[^TiGeRShArK^]

si visual basic for application mi sa che è la scelta + facile e immediata...
Io per ora sto accedendo direttamente da visual studio tramite il C# ai worksheet, ma per quello che devi fare tu mi sa che è troppo sovradimensionato

[shambler1]

Quale potrebbe essere il codice?

[^TiGeRShArK^]

Originariamente inviato da shambler1

Quale potrebbe essere il codice?

non ho excel qui che sono sul mac...
cmq basterebbe scrivere qualcosa del genere:

for i = 0 to 100
    Cell(10,i) = "Pippo"
next

tieni conto che il codice del ciclo l'ho scritto in basic dato che in VB non mi ricordo se è così e che il metodo Cell l'ho inventato di sana pianta, ma devi guardare nella guida del VBA per excel come si accede all'oggetto giusto che ti dovrebbe dare accesso alla lista di cell del worksheet.

[MarcoGG]

Originariamente inviato da shambler1

Ho un enorme foglio costituito da una mega query tradotta da Access ad Excel e devo sostituire con una procedura, il valore vuoto con una stringa di testo. Come posso fare? sono oltre 100 colonne.
Da VB?

Esatto.
Io ti consiglio un pulsante con questo codice :

Private Sub CommandButton1_Click()

    Dim limite As Long
    limite = ActiveSheet.UsedRange.Rows.Count
    Dim cella As Range
    For Each cella In Range("A:G")
        If cella.Row > limite Then Exit For
        If cella.Value = "" Then cella.FormulaR1C1 = "MIA_STRINGA"
    Next

End Sub

A:G nel caso A sia la prima colonna dell'intervallo da controllare e G l'ultima...
Sostituire dove Rosso con valori desiderati e provare...

[shambler1]

Originariamente inviato da MarcoGG

Esatto.
Io ti consiglio un pulsante con questo codice :

Private Sub CommandButton1_Click()

    Dim limite As Long
    limite = ActiveSheet.UsedRange.Rows.Count
    Dim cella As Range
    For Each cella In Range("A:G")
        If cella.Row > limite Then Exit For
        If cella.Value = "" Then cella.FormulaR1C1 = "MIA_STRINGA"
    Next

End Sub

A:G nel caso A sia la prima colonna dell'intervallo da controllare e G l'ultima...
Sostituire dove Rosso con valori desiderati e provare...

Va in loop ..

[MarcoGG]

Originariamente inviato da shambler1

Va in loop ..

Possibile ?
Se puoi mandami il file su cui lo hai testato e vedo di che si tratta...