Pagina 1 di 1
[Risolto] Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 10:15
da Nando69
Salve a tutti. Il tema può apparire forse insolito ma al tempo stesso interessante. Prendendo spunto dal file allegato vorrei giusto capire se all'interno della griglia (semplificata nell'occasione per rendere più chiaro l'argomento),esiste un modo per eliminare i valori numerici in UN COLPO SOLO (lasciando perciò i nomi delle persone) senza quindi dover utilizzare ad ogni riga la funzione "Cancella". Lo facessi tutto in una volta andrei ovviamente a eliminare il foglio completo. Una buona giornata
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 10:31
da patel
Perché parli di finestra invece che di foglio ? vuoi eliminare le righe o solo cancellare i valori numerici ? dall'esempio sembra che ogni 4 righe ci sia quella con i numeri, è sempre così ?
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 10:32
da Nando69
Salve. Mi riferivo all'intervallo di celle dentro al foglio da A1 fino ad H25. Mi sembrava abbastanza scontato del resto
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 10:36
da patel
Ho aggiunto altre domande al post precedente
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 10:36
da Nando69
Voglio solo cancellare i valori numerici. Il salto delle righe può variare. In quest'occasione l'ho fatto in modo lineare. Quella con i numeri potrebbe anche essere ogni 6 o 7 righe
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 10:53
da patel
prova questa
Codice: Seleziona tutto
Sub scanrange
Doc = ThisComponent
Sheet=doc.sheets(0)
rng = Sheet.getCellRangeByName("A1:H25")
col1= rng.RangeAddress.StartColumn
col2= rng.RangeAddress.EndColumn
row1= rng.RangeAddress.StartRow
row2= rng.RangeAddress.EndRow
drow=0
dcol = 7
for row=row1 to row2
for col =col1 to col2
If Sheet.getCellByPosition(col, row).value > 0 then Sheet.getCellByPosition(col, row).String = ""
next
next
End Sub
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 10:56
da Nando69
Ok,provo
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: domenica 30 luglio 2023, 22:15
da Nando69
Ciao di nuovo Patel (e ovviamente a tutti gli altri utenti). Scusa,ho cancellato l'ultimo messaggio di ringraziamento e contestualmente non ho ancora messo "Risolto" perchè volevo chiederti ancora un piccolo favore se possibile. Vale a dire quale modifica occorre apportare se dovesse capitarmi di eliminare valori numerici che hanno come valore lo zero (0). Allego file. Buona serata
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: lunedì 31 luglio 2023, 11:38
da patel
If IsNumeric(Sheet.getCellByPosition(col, row).String) then Sheet.getCellByPosition(col, row).String = ""
Re: Eliminare in un colpo solo i valori numerici all'interno di una finestra
Inviato: lunedì 31 luglio 2023, 12:03
da Nando69
Perfetto,grazie mille