Creare una macro per inserimento appuntamenti

cavaliere123

Utente Attivo
31 Lug 2012
415
0
0
Creare una macro per inserimento appuntamenti
Salve a tutti, è da moltissimo che non pongo più domande... ma adesso mi tocca

Arrivando subito al dunque ho creato in excel un calendario per appuntamenti e le date di tutto l'anno sono messe una sotto l'altra. per intenderci cosi :

DATA GIORNO ORA INTERESSATO LUOGO MOTIVO DESTINATARIO
1-gen Martedi
2-gen Mercoledi
3-gen Giovedi
3-gen Giovedi
4-gen Venerdi
5-gen Sabato
6-gen Domenica
7-gen Lunedi

chiaramente in celle diverse, adesso desidero creare una macro con pulsante che se ad esempio mi trovo sulla cella del Mercoledì mi inserisca una riga sotto con la stessa data. per un nuovo inserimento, sempre per chiarezza se attivo la macro deve venirmi così :


DATA GIORNO ORA INTERESSATO LUOGO MOTIVO DESTINATARIO
1-gen Martedi
2-gen Mercoledi
---> 2-gen Mercoledi
3-gen Giovedi
3-gen Giovedi
4-gen Venerdi
5-gen Sabato
6-gen Domenica
7-gen Lunedi

E posso inserire solo 10 righe per ogni data, cioè in effetti massimo dieci appuntamenti al giorno...
Chiaramente ho cercato di fare questa macro che valga per tutte le celle e quindi :

Codice:
Sub RIGAX() 
' 
'RIGAX Macro 
' 
' 
For x = 0
If x = 9 Then Exit Sub '
a = 12 
y = 13     ( 13 è la riga da cui parte l'elenco nel mio foglio)
Z = y + x
b = a + x 
Rows(Z & ":" & Z).Select 
Selection.Insert Shift:=xlDown 
Range(Cells("B", b), Cells("C" , b)).Select 
Selection.Copy 
Range("B" & b).Select 
ActiveSheet.Paste ActiveSheet.Paste Application.CutCopyMode = False 
Range("D" & Z).Select 
x = x + 1
End Sub

questa macro in effetti, prima inserisce la riga sotto alla cella del giorno selezionato e poi copia il contenuto della cella del giorno e la incolla nella riga inserita, così da avere già scritta anche la data....
Bene... chiaramente come al solito qualcosa ho errato... vi ricordo scusandomi che non sono un esperto chiaramente....
Vi ringrazio anticipatamente se qualcuno sarà così gentile da aiutarmi...
Grazie e buona giornata da Domenico.
 

cavaliere123

Utente Attivo
31 Lug 2012
415
0
0
Per terminare....

Per correttezza posto la procedura completamente rivista, grazie all'aiuto di un esperto trovato in atri gruppi...
Credo che sia più che corretto divulgare ciò che si fa, in special modo se prima si è chiesto :)

Ecco la procedura :

Codice:
Sub Macro1()
'
' Macro1 Macro
'

'
    w = Cells(Selection.Row, Selection.Column).Column
    If w <> 1 Then Exit Sub '
    If Cells(Selection.Row, 1).Value = Cells(Selection.Row + 1, 1).Value Then Exit Sub '
     cont = 1
     For x = 14 To Cells(Selection.Row, 1).Row
     valore_celle = Cells(x, 1).Value
     If valore_celle = Cells(Selection.Row, 1).Value Then
     cont = cont + 1
     End If
    Next
     If cont > 3 Then Exit Sub '
     Rows(Selection.Row + 1).Insert Shift:=xlDown
        Cells(Selection.Row + 1, 1) = Selection
        Cells(Selection.Row + 1, 2) = Selection.Offset(, 1)
End Sub
 
Discussioni simili
Autore Titolo Forum Risposte Data
C Creare una form con pulsanti di scelta macro Visual Basic 1
L Creare una forma geometrica Photoshop 1
W Creare link di una dato Classic ASP 0
MarcoGrazia Creare una password Snippet Javascript 0
L Creare una pagina pre-home WordPress 1
L creare oggetti da una classe tramite un form Javascript 0
R Bootstrap 4 - creare una finestra di testo responsive sopra un Carousel jQuery 1
T con oop creare un ciclo per una pagina dinamica html con php PHP 3
M [MySQL] CREARE UN LINK SU UN DETERMINATO CAMPO DI UNA TABELLA RISULTATO DI UNA QUERY SQL MySQL 3
V [WordPress] Creare una struttura di articoli da una struttura di cartelle WordPress 1
jonnino2004 Sito .it vale la pena creare una versione in inglese? SEO e Posizionamento 1
S [WordPress] Creare una select box con partita iva e codice fiscale in base a una logica. WordPress 0
Axis18 Creare una barra di avanzamento con $.ajax Ajax 7
B funzioni per creare file e inserirli dentro una certa cartella in php? PHP 1
utente è possibile creare una pagina php che copia interamente il contenuto di un'altra pagina ? PHP 10
M come creare un popup con CSS da una pagina esterna? jQuery 1
L [php e xml] per creare una galleria fotografica con diversi file xml PHP 0
deejayr Creare un link URL ad un pulsante di una pagina web. Javascript 4
P [PHP] come creare una chat PHP 24
S creare una tabella da codice PHP 4
Gabriele Visioli Come creare uno spoiler in una pagina o post WordPress 1
A Creare una fattura con dati di intestazione estratti da tabella MySQL 0
P [CERCO] esperto per creare una chat room seria Offerte e Richieste di Lavoro e/o Collaborazione 1
M creare una tabella dove inserire i dati del database Database 1
N Creare una web community Discussioni Varie 6
S PHP: creare un link in una pagina PHP 7
F mysqli creare una select con valori dal db PHP 4
R Creare una classifica con Access 2007 Database 1
G Creare una forma irregolare colorata e poi modellarla con photoshop. Photoshop 7
M Access-Query per creare una tabella con la data nel nome tabella MS Access 0
felino [CSS] Immagine, creare una striscia nell'angolo superiore della foto HTML e CSS 10
A Creare una classe espressione Java 1
R Creare una videochat a pagamento Offerte e Richieste di Lavoro e/o Collaborazione 2
gaia creare una tabella dall'unione di due tabelle MySQL 3
M creare una lista di commenti in un database PHP 1
W Da dove si parte a creare una App?? Sviluppo app per Android 2
T vBulletin 3.8.x E' possibile creare una nuova pagina in PHP nel forum? VBulletin 0
J Creare una classe view php PHP 0
felino [JS] Creare una variabile dinamicamente tramite Ciclo For Javascript 4
P Creare e animare una progess bar PHP 13
M creare una ListView non cliccabile Sviluppo app per Android 1
R creare una pagina su sito web HTML e CSS 2
S [risolto] Creare una mappa Google per ogni indirizzo Javascript 14
denisgligor ciao, vorrei creare una pagina personale per ogni utente con un dominio di terzo livello... si può ? PHP 0
A Creare una galleria foto senza refresh PHP 0
A Creare nuova casella di una tabella Javascript 4
A Creare una nuova cartella utente PHP 3
T creare una serie di combobox e text box e che salvano un file di text sul disco si può ? Visual Basic 1
8 Creare un figlio di una classe generica HTML e CSS 7
M Creare una Web radio Discussioni Varie 0

Discussioni simili