| | Post: 2 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
  03/02/2017 10:50 | |
Buongiorno,
faccio parte di un gruppo di protezione civile e mi servirebbe in vostro aiuto.
Stò creando una tabella per registrare le persone in accesso ad un campo di soccorso. Non conosco benissimo Excel ma sono sicuro che voi potete aiutarmi.
In questa tabella (che stò cercando di inserire) nella colonna G se il valore è 1 dovrebbe riportarmi l'intera riga al giorno successivo.
Praticamente arriva una persona al campo...la registro con documenti ecc e chiedo conferma per riservarle il posto del giorno seguente. Se mi conferma metto 1 sulla cella della riga corrispondente (colonna G) al suo nome ed in automatico mi riporta l'intera riga al gg seguente.
Ho creato sette fogli con i giorni della settimana e tutti dovrebbero essere collegati tra loro.
E possibile farlo? Ora lo faccio manualmente ma era più comodo e veloce se ci fosse una formula che mi permette di automatizzare la faccenda.
Potete aiutarmi?
Vi ringrazio infinitamente.
Come posso mettere la tabella o la foto?
|
|
| | Post: 2.709 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Veteran | Excel 365 | | OFFLINE |
|
| 03/02/2017 12:12 | |
Ciao Massiminiano
Non devi mettere una foto con la quale non si può far nulla ma un file di Excel e sulla base di questo spiega quello che vuoi fare/ottenere
Alfredo |
| | Post: 2 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 03/02/2017 18:23 | |
Devo mettere proprio il file di excel che vorrei modificare?
Per quanto riguarda la descrizione su cosa vorrei fare l'ho scritto sopra. Scusate ma sono nuovo e poco pratico ![[SM=g27813]](https://im0.freeforumzone.it/up/0/13/5117592.gif) |
| | Post: 2.710 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Veteran | Excel 365 | | OFFLINE |
|
| 03/02/2017 19:14 | |
Se alleghi il file è sempre meglio. [Modificato da alfrimpa 03/02/2017 19:15]
Alfredo |
| | Post: 482 | Registrato il: 02/08/2015
| Utente Senior | Excel 2013 | | OFFLINE |
|
| 04/02/2017 23:40 | |
Ciao a tutti,
come già detto da Alfredo ( ![[SM=g27811]](https://im0.freeforumzone.it/up/0/11/10151015.gif) ) serve il file (senza dati sensibili), anche perchè se ho interpretato bene, quello che chiedi può essere fatto solo tramite VBA.
Attendiamo tue notizie...
Ciao
Tore ![[SM=x423053]](http://www.erismag.it/Servizio/ForumExcel/Smiles/Faccina_0033.gif)
"Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare." |
| | Post: 3 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 05/02/2017 14:03 | |
Scusate come posso inserirlo?? Nell'opzione scegli file non mi da la possibilità |
| | Post: 2.711 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Veteran | Excel 365 | | OFFLINE |
|
| 05/02/2017 15:23 | |
Ma certo che te lavdà.
Nella finestra di risposta in basso a sinistra trovi il pulsante carica file/foto.
Cluccaci su e vai avanti.
Se il file contiene macro va zippato.
Alfredo |
| | Post: 4 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 05/02/2017 15:26 | |
Forse devo farlo dal pc...da telefono mi da solo scegli file e quando vado a trovare la tabella non me la fa selezionare ![[SM=g27812]](https://im0.freeforumzone.it/up/0/12/5757084.gif) |
| | Post: 5 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 06/02/2017 08:31 | |
eccolo credo ci sia riuscito. ![[SM=g27828]](https://im0.freeforumzone.it/up/0/28/9572832.gif)
Grazie e scusate. |
| | Post: 6 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 06/02/2017 08:35 | |
In questa tabella (che stò cercando di inserire) nella colonna G se il valore è 1 dovrebbe riportarmi l'intera riga al giorno successivo.
Praticamente arriva una persona al campo...la registro con documenti ecc e chiedo conferma per riservarle il posto del giorno seguente. Se mi conferma metto 1 sulla cella della riga corrispondente (colonna G) al suo nome ed in automatico mi riporta l'intera riga al gg seguente.
Ho creato sette fogli con i giorni della settimana e tutti dovrebbero essere collegati tra loro.
Potete aiutarmi? magari facendo la formula su tutti i sette gg?
Grazie io nn saprei proprio dove mettermi le mani. ![[SM=g27819]](https://im0.freeforumzone.it/up/0/19/28152828.gif) |
| | Post: 3.693 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 06/02/2017 08:44 | |
[QUOTE:134091528=MassimilianoRosati, 03/02/2017 Se mi conferma metto 1 sulla cella della riga corrispondente (colonna G) al suo nome ed in automatico mi riporta l'intera riga al gg seguente.
l'intera riga comprende il num del letto, quel letto non potrebbe essere già occupato ?
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 486 | Registrato il: 02/08/2015
| Utente Senior | Excel 2013 | | OFFLINE |
|
| 06/02/2017 08:51 | |
patel45, 06/02/2017 08.44:
l'intera riga comprende il num del letto, quel letto non potrebbe essere già occupato ?
Giusta osservazione patel ![[SM=g27822]](https://im0.freeforumzone.it/up/0/22/4980138.gif)
Direi che la cosa migliore è riportarla alla prima riga disponibile del giorno successivo (SE diponibile).
"Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare." |
| | Post: 3.694 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 06/02/2017 09:15 | |
prova questa da inserire nel modulo di thisworkbook
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Column = 7 Then
If Target.Value = 1 Then
r = Target.Row
numfoglio = Sh.Index + 1
LR = Sheets(numfoglio).Cells(Rows.Count, "C").End(xlUp).Row + 1
If LR < 305 Then
Sheets(numfoglio).Range("C" & LR & ":F" & LR).Value = Sh.Range("C" & r & ":F" & r).Value
Sheets(numfoglio).Range("H" & LR & ":P" & LR).Value = Sh.Range("H" & r & ":P" & r).Value
End If
End If
End If
End Sub allego anche il file
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 7 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 07/02/2017 16:38 | |
Ragazzi che dite è fattibile? |
| | Post: 8 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 07/02/2017 16:42 | |
patel45, 06/02/2017 08.44:
[QUOTE:134091528=MassimilianoRosati, 03/02/2017 Se mi conferma metto 1 sulla cella della riga corrispondente (colonna G) al suo nome ed in automatico mi riporta l'intera riga al gg seguente.
l'intera riga comprende il num del letto, quel letto non potrebbe essere già occupato ?
Ciao No in teoria il letto resta assegnato a quella persona per l'intera permanenza. Infatti nella colonna G ho messo conferma pernotto giorno seguente. Il gg dopo se mi conferma in automatico lo aggiunge ES al mercoledi se no no. |
| | Post: 493 | Registrato il: 02/08/2015
| Utente Senior | Excel 2013 | | OFFLINE |
|
| 07/02/2017 16:44 | |
MassimilianoRosati, 07/02/2017 16.38:
Ragazzi che dite è fattibile?
![[SM=g27833]](https://im0.freeforumzone.it/up/0/33/6206759.gif)
Ma l'hai visto il post precedente?
patel ti ha già dato la soluzione.
"Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare." |
| | Post: 9 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 07/02/2017 16:44 | |
patel45, 06/02/2017 09.15:
prova questa da inserire nel modulo di thisworkbook
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Column = 7 Then
If Target.Value = 1 Then
r = Target.Row
numfoglio = Sh.Index + 1
LR = Sheets(numfoglio).Cells(Rows.Count, "C").End(xlUp).Row + 1
If LR < 305 Then
Sheets(numfoglio).Range("C" & LR & ":F" & LR).Value = Sh.Range("C" & r & ":F" & r).Value
Sheets(numfoglio).Range("H" & LR & ":P" & LR).Value = Sh.Range("H" & r & ":P" & r).Value
End If
End If
End If
End Sub allego anche il file
Scusami ma sono proprio ignorante in materia...potresti farlo x me?
Poi scarico la tabella e ti dico. Se puoi è...
Vi ringrazio tutti infinitamente. |
| | Post: 10 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 07/02/2017 16:45 | |
cromagno, 07/02/2017 16.44:
MassimilianoRosati, 07/02/2017 16.38:
Ragazzi che dite è fattibile?
Ma l'hai visto il post precedente?
patel ti ha già dato la soluzione.
Non me lo dava scusate. Da cellulare è un casino. Mi aveva aperto solo i primi commenti.
Scusate ancora.
|
| | Post: 11 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 08/02/2017 12:36 | |
patel45, 06/02/2017 09.15:
prova questa da inserire nel modulo di thisworkbook
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Column = 7 Then
If Target.Value = 1 Then
r = Target.Row
numfoglio = Sh.Index + 1
LR = Sheets(numfoglio).Cells(Rows.Count, "C").End(xlUp).Row + 1
If LR < 305 Then
Sheets(numfoglio).Range("C" & LR & ":F" & LR).Value = Sh.Range("C" & r & ":F" & r).Value
Sheets(numfoglio).Range("H" & LR & ":P" & LR).Value = Sh.Range("H" & r & ":P" & r).Value
End If
End If
End If
End Sub allego anche il file
io ho provato ma non riesco ad inserire il codice anche se scaricando la tua già lo vedo presente ma non riesco a farlo funzionare.
|
| | Post: 3.695 | Registrato il: 13/03/2012
| Città: LIVORNO | Età: 78 | Utente Master | 2010 | | OFFLINE | |
|
| 08/02/2017 17:01 | |
non lo devi far funzionare, si attiva da solo quando usi i fogli
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta |
| | Post: 12 | Registrato il: 03/02/2017
| Città: SPOLETO | Età: 43 | Utente Junior | excell 2007 | | OFFLINE | |
|
| 13/02/2017 11:10 | |
Buongiorno, non sò se è la mia versione di excel 2007 a non funzionare o cosa.
Ho provato in tutti i modi. |
|
|
|
|