| | Post: 247 | Registrato il: 04/03/2020
| Età: 77 | Utente Junior | 2019 | | OFFLINE | |
|
  17/03/2022 23:35 | |
Salve ai presenti
chiedo, cortesemente, 2 (si fa per dire) righe di codice
ciò che chiedo:
in colonna H11:H10000 se trova 1 deve sostituire il dato della stessa riga della colonna b
In corrispondenza nella colonna B è presente Ba, Ca....fino a Ve a seconda della riga
Grazie dell'aiuto |
|
| | Post: 1.193 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
| 18/03/2022 08:38 | |
Vedi di farne buon uso, quanto meno come logica: For Each cella In Range("H11:H10000")
If cella = 1 Then cella.Offset(0, -6) = "quello che serve" 'H-6=B
Next cella
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 247 | Registrato il: 04/03/2020
| Età: 77 | Utente Junior | 2019 | | OFFLINE | |
|
| 18/03/2022 21:42 | |
Salve Rollis,
grazie dell'aiuto solo che non ho capito
rollis13, 18/03/2022 08:38:
Vedi di farne buon uso, quanto meno come logica: For Each cella In Range("H11:H10000")
If cella = 1 Then cella.Offset(0, -6) = "quello che serve" 'H-6=B
Next cella
If cella = 1 Then cella.Offset(0, -6) = "quello che serve" 'H-6=B
se non scrivo niente in colonna B mi da FALSO.
Ho provato con selection.copy
ma va in errore cioè mi chiede che manca l'impostazione with |
| | Post: 1.195 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
| 19/03/2022 00:43 | |
Se vuoi un aiuto utile, bisogna capire cosa stai cercando di fare perché le info che stai fornendo non sono sufficienti; io non sono dotato di Sfera di Cristallo. Allega un file con la struttura dei tuoi dati in un foglio e magari in un altro foglio quello che vorresti ottenere scritto manualmente.
Per ora tutto quello che ho capito è che se in colonna H trova il valore 1 deve fare qualche cosa in colonna B e questo è quello che fa quella riga di codice. [Modificato da rollis13 19/03/2022 00:43]
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 248 | Registrato il: 04/03/2020
| Età: 77 | Utente Junior | 2019 | | OFFLINE | |
|
| 19/03/2022 05:30 | |
Hai ragione Rollis come hai detto noi vi consideriamo di super poteri
Trovando il numero 1 questo verrebbe sostituito
Dal valore di rigo di colonna B
Ipotesi se a rigo 100 H100 = 1 e B100 = Ba
H100 = Ba
Grazie la prossima alleghero' il file |
| | Post: 193 | Registrato il: 02/04/2018
| Città: PESCARA | Età: 75 | Utente Junior | EXCEL 2016 - SPREAD32 | | ONLINE |
|
| 19/03/2022 10:02 | |
rollis13, 19/03/2022 00:43:
Se vuoi un aiuto utile, bisogna capire cosa stai cercando di fare perché le info che stai fornendo non sono sufficienti; io non sono dotato di Sfera di Cristallo. Allega un file con la struttura dei tuoi dati in un foglio e magari in un altro foglio quello che vorresti ottenere scritto manualmente.
Per ora tutto quello che ho capito è che se in colonna H trova il valore 1 deve fare qualche cosa in colonna B e questo è quello che fa quella riga di codice.
Buongiorno Rollis
non è per caso che l'Utente voglia il contrario ? e cioè se H3 = 1 allora H3 = B3
tutto dipende dal suo modo di esprimersi
Codice
For Each cella In Range("H11:H10000")
If cella = 1 Then cella.Offset(0, 0) = cella.Offset(0, -6)
Next cella
LEO
LEO
https://t.me/LordBrum |
| | Post: 1.196 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
| 19/03/2022 12:30 | |
Grazie @gga46 delle ulteriori info.
@L2018, adesso che ho letto il post #5 posso dire che hai perfettamente ragione. Ero convintissimo che, alle 8:38 del mattino, le informazioni nel post #1 fossero un po' confuse, probabilmente, invece, lo ero io. [Modificato da rollis13 19/03/2022 17:00]
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 249 | Registrato il: 04/03/2020
| Età: 77 | Utente Junior | 2019 | | OFFLINE | |
|
| 19/03/2022 15:51 | |
Salve Grazie del tuo contributo L2018
Grazie della conclusione Rollis
funziona perfettamente
RISOLTO |
|
|
|
|