Pagina 1 di 1

[Risolto] Incolla i valori con Limit di Colonne

Inviato: domenica 17 febbraio 2019, 19:24
da chimico
Saluti ,

         Ho una macro di sr. patel che copia le celle visibili dal foglio di lavoro 1 e incolla i valori nel foglio di lavoro 2, dalla colonna "A" alla colonna "L" .

         ma il problema è che ci sono altri valori inseriti nella colonna "M", quindi al momento di Paste nel foglio di lavoro 2, stai guardando la colonna "M" e incollando i valori della colonna "M" .

         al momento di Incolla, non dovrebbe guardare i valori della colonna "M", dovrebbe semplicemente incollare la colonna "L", come scritto nella macro .

altro bisogno:
Anche ho bisogno di modificare la macro per copiare i valori Se i titoli della Linea 1 sono per esempio nella Linea 4, cioè Se la tabella era un po 'più bassa, ad esempio iniziare dalla Linea 4 del foglio di lavoro 1
         osservazione:

         Ho allegato il file e inserito un foglio di lavoro 3 con il risultato atteso che ho bisogno di raggiungere .
      
abbracci amici .

Re: Incolla i valori con Limit di Colonne

Inviato: lunedì 18 febbraio 2019, 8:48
da patel
prova a calcolare l'ultima riga del foglio2 in questo modo

Codice: Seleziona tutto

   Call ultima_cella 
   LR2 = oDoc.CurrentSelection.CellAddress.Row 
quindi

Codice: Seleziona tutto

sub copia_visibile
   bValues = True 
  
   oDoc = ThisComponent
   sheet1= oDoc.Sheets.getByName("Planilha1")
   sheet2= oDoc.Sheets.getByName("Planilha2")
   oCursor = Sheet1.createcursor
   oCursor.gotoendofusedarea(false)
   nEndrow = oCursor.rangeaddress.Endrow
   Call ultima_cella 
   LR2 = oDoc.CurrentSelection.CellAddress.Row 

Re: Incolla i valori con Limit di Colonne

Inviato: lunedì 18 febbraio 2019, 20:14
da chimico
sr. patel ,
Grazie mille, è stato molto bello . :super: :bravo:

ma hanno l'altra necessità di risolvere :
Anche ho bisogno di modificare la macro per copiare i valori Se i titoli della Linea 1 sono per esempio nella Linea 4, cioè Se la tabella era un po 'più bassa, ad esempio iniziare dalla Linea 4
il file con il foglio di calcolo 1B mostra la nuova necessità .

Re: Incolla i valori con Limit di Colonne

Inviato: martedì 19 febbraio 2019, 8:31
da patel
basta modificare la riga iniziale del range da copiare, quindi la riga
rng=sheet1.getcellrangebyPosition(0,1,4,nEndrow) 'copiare
diventa
rng=sheet1.getcellrangebyPosition(0,4,4,nEndrow) 'copiare

Re: Incolla i valori con Limit di Colonne

Inviato: martedì 19 febbraio 2019, 8:59
da chimico
[RISOLTO]

Ha funzionato perfettamente, grazie mille per il tuo aiuto , sr. patel . :bravo: :super:

amico abbraccio .