FAR PARTIRE MACRO DA UN PUNTO PRECISO

Versione Completa   Stampa   Cerca   Utenti   Iscriviti     Condividi : FacebookTwitter
Vanessa Costantini
00venerdì 24 febbraio 2017 17:02
Buon pomeriggio,
ho un piccolo problemino che probabilmente è già stato affrontato ma non riesco a trovare nulla di simile.
Ho registrato una macro con inserimento automatico di determinate righe, il problema è che non mi inserisce le righe dal punto che determino, ma sembre dalla stessa riga... come posso risolvere la cosa??
Spero di essermi spiegata :( [SM=x423054]

Sub Macro7()
'
' Macro7 Macro
'

'
Range("A29:S29").Select
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Range("A30").Select
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Range("A31").Select
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
ActiveWindow.SmallScroll Down:=6
Range("G28").Select
Selection.AutoFill Destination:=Range("G28:G34"), Type:=xlFillDefault
Range("G28:G34").Select
Range("J28").Select
Selection.AutoFill Destination:=Range("J28:J34"), Type:=xlFillDefault
Range("J28:J34").Select
Range("M28").Select
Selection.AutoFill Destination:=Range("M28:M34"), Type:=xlFillDefault
Range("M28:M34").Select
Range("Q28").Select
Selection.AutoFill Destination:=Range("Q28:Q34"), Type:=xlFillDefault
Range("Q28:Q34").Select
Range("A29:S29,A31:S31,A33:S33").Select
Range("A33").Activate
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End Sub
Vanessa Costantini
00venerdì 24 febbraio 2017 17:43
c'è nessunoooooooooooooo?????
alfrimpa
00venerdì 24 febbraio 2017 17:56
Ciao Vanessa

Beh dire "C'è nessuno" dopo appena 4o minuti dalla richiesta non ti sembra eccessivo? [SM=g27828]

Comunque, a prescindere dalla tua macro (che presumo registrata), prova allegare un file di esempio con dati fittizi, spiegazione e risultato desiderato inserito a mano.

Vanessa Costantini
00venerdì 24 febbraio 2017 18:12
Chiedo troppo dopo 40 minuti dici??
Non sono mai entrata in un forum per scrivere.. ma solo per leggere!!! [SM=x423030]

Comunque ho allegato il file..
alfrimpa
00venerdì 24 febbraio 2017 19:13
Ciao Vanessa

La mia era solo una battuta ma, devi sapere, che sui forum ognuno risponde come e quando può per cui - una volta postata la richiesta si attende con cristiana pazienza [SM=g27828] [SM=g27828]

Ora darò uno sguardo al tuo file e se sarò in grado di aiutarti sarò ben felice di farlo; e se non sarò in grado io ci sarà di sicuro qualcun altro.
alfrimpa
00venerdì 24 febbraio 2017 19:21
Dunque Vanessa ho guardato il file ma non ho ben capito cosa vuoi fare.

Ho visto il pulsante che credo sia collegato alla macro che hai postato prima.

Puoi spiegare a parole e con riferimento ai dati presenti sul foglio "PRIMA NOTA 17" cosa dovrebbe fare la macro?
Riky0185
00sabato 25 febbraio 2017 10:00
Pazienza Alfredo, come tutti i giovani di oggi vorrebbero "pronto e subito". La macro postata da Vanessa, che fra l'altro non esiste nell'editor di VB, dovrebbe inserire 5 righe a partire dalla riga 28, dove non esistono dati, e copiare nelle 5 righe nuove i soli dati dei "Saldo", presi però dalla riga 28 che è completamente vuota.
Perciò senza chiarimenti di Vanessa non si può fare nulla.
Zer0kelvin
00sabato 25 febbraio 2017 10:52
Re:
Riky0185, 25/02/2017 10.00:

Pazienza Alfredo, come tutti i giovani di oggi vorrebbero "pronto e subito".

Credo di avere una soluzione per questo. Introdurre una nuova materia obbligatoria a scuola: coltivazione di un bonsai, e chi non riesce non becca il diploma e nemmeno la laurea![SM=x423032]
[SM=x423026]


Riky0185
00sabato 25 febbraio 2017 11:57
Zero...piacere di rivederti.
Fra l'altro il file allegato da Vanessa contiene dei collegamenti ad altri files i cui dati probabilmente dovrebbero occupare le celle da cui attivare la macro7. Ma i files non ci sono. Perciò Vanessa dovrebbe trasformare in valori i dati di questi collegamenti e spiegare, come suggerito da Alfredo, che saluto, cosa vuole ottenere.
alfrimpa
00sabato 25 febbraio 2017 12:18
Marco bentornato!
Vanessa Costantini
00mercoledì 1 marzo 2017 14:29
Intanto volevo farvi presente che non sono una bimba ma ho 30 anni..

Onestamente non ho molto tempo per studiare bene il discorso excel e mando avanti un'attività..
Riprovo a spiegare il quesito ma non sono sicura di esprimermi bene!

Il bottone 5 righe, mi inserisce in automatico ovviamente le righe ed ho registrato la macro per ottenerlo.. il problema nasce dal fatto che ho bisogno di inserire le righe dal punto che indico al cursore (riga 10 piuttosto che 20) e non sempre dal punto di origine della macro..

alfrimpa
00mercoledì 1 marzo 2017 15:03
Ciao Vanessa

Nessuno aveva dubitato che fossi una donna e non una bambina [SM=g27828] .

Comunque prova questa macro che inserisce 5 righe vuote al di sotto della cella attiva (quella dove è il cursore).

vb
Sub Macro1()
Dim i As Integer
For i = 1 To 5
    Selection.Insert Shift:=xlDown
Next i
End Sub



Non so se era questo quello che volevi.

E poi consentimi di dire una cosa visto che ho più del doppio della tua età: se vuoi utilizzare Excel (programma dalle enormi potenzialità) un minimo di tempo e di studio lo devi mettere in preventivo altrimenti sarai sempre dipendente dagli altri per la risoluzione dei problemi che inevitabilmente incontrerai.
Questa è la versione 'lo-fi' del Forum Per visualizzare la versione completa clicca qui
Tutti gli orari sono GMT+01:00. Adesso sono le 05:52.
Copyright © 2000-2024 FFZ srl - www.freeforumzone.com