{"id":705,"date":"2013-08-08T10:17:27","date_gmt":"2013-08-08T08:17:27","guid":{"rendered":"http:\/\/www.office-guru.com\/wordpress\/?p=705"},"modified":"2014-04-12T17:01:03","modified_gmt":"2014-04-12T15:01:03","slug":"duplicare-righe","status":"publish","type":"post","link":"https:\/\/www.office-guru.com\/wordpress\/2013\/08\/duplicare-righe\/","title":{"rendered":"024. Duplicare righe"},"content":{"rendered":"<div style=text-align:right;><a class=\"wpptopdfenh\" target=\"_blank\" rel=\"noindex,nofollow\" href=\"https:\/\/www.office-guru.com\/wordpress\/2013\/08\/duplicare-righe\/?format=pdf\" title=\"Download PDF\"><img alt=\"Download PDF\" src=\"https:\/\/i0.wp.com\/www.office-guru.com\/wordpress\/wp-content\/plugins\/wp-post-to-pdf-enhanced\/asset\/images\/pdf.png?w=584\" data-recalc-dims=\"1\"><\/a><\/div><p>Domanda:<\/p>\n<p>avendo un elenco di quasi 2000 righe una attaccata all\u2019altra, ho bisogno di una Macro che fra una righe e un altra mi copi la riga sovrastante. Ad esempio, partendo da:<\/p>\n<p>colonnaA colonnaB<br \/>\nfederico rossi<br \/>\nluca bianchi<\/p>\n<p><!--more-->diventi:<\/p>\n<p>colonnaA colonnaB<br \/>\nfederico rossi<br \/>\nfederico rossi<br \/>\nluca bianchi<br \/>\nluca bianchi<\/p>\n<p>Risposta:<\/p>\n<p>Per ottenere il risultato voluto copia nel tuo file il seguente codice:<\/p>\n<pre>Public Sub DuplicaRighe()\r\nApplication.ScreenUpdating = False\r\n\r\nLast_Row = ActiveSheet.Cells.Find(\"*\", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row\r\n\r\nFor i = Last_Row To 2 Step -1\r\n\r\nRows(i).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove\r\nRange(Cells(i + 1, 1), Cells(i + 1, 2)).Copy\r\nRange(Cells(i, 1), Cells(i, 2)).Select\r\nActiveSheet.Paste\r\n\r\nNext i\r\n\r\nRows(2).RowHeight = Rows(3).RowHeight\r\nApplication.CutCopyMode = False\r\nRange(\"A1\").Select\r\n\r\nApplication.ScreenUpdating = True\r\nMsgBox \"Fatto!\", vbInformation\r\n\r\nEnd Sub<\/pre>\n<p>In allegato il file d&#8217;esempio<\/p>\n<p><a href=\"http:\/\/www.office-guru.com\/wordpress\/wp-content\/uploads\/2013\/08\/Duplicazione-righe.xlsm\">Duplicazione righe<\/a><\/p>\n<p>Riccardo Vincenti<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Domanda: avendo un elenco di quasi 2000 righe una attaccata all\u2019altra, ho bisogno di una Macro che fra una righe e un altra mi copi la riga sovrastante. Ad esempio, partendo da: colonnaA colonnaB federico rossi luca bianchi<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"spay_email":"","jetpack_publicize_message":"","jetpack_is_tweetstorm":false,"jetpack_publicize_feature_enabled":true,"_links_to":"","_links_to_target":""},"categories":[1],"tags":[],"jetpack_featured_media_url":"","jetpack_publicize_connections":[],"jetpack_shortlink":"https:\/\/wp.me\/p39IU1-bn","jetpack_sharing_enabled":true,"jetpack_likes_enabled":true,"jetpack-related-posts":[{"id":1745,"url":"https:\/\/www.office-guru.com\/wordpress\/2017\/09\/067-riordinare-tabella\/","url_meta":{"origin":705,"position":0},"title":"067. Riordinare tabella","date":"20 Settembre 2017","format":false,"excerpt":"Luigi ci scrive: ho necessita di allineare i dati della colonna A con quelli contenuti nella colonna B traslando i dati della riga relativa es Colonna A Colonna B Colonna C A C 10 B A 20 C D 30 D RISULTATO Colonna A Colonna B Colonna C A A\u2026","rel":"","context":"In &quot;Domande Lettori&quot;","img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":1145,"url":"https:\/\/www.office-guru.com\/wordpress\/2014\/04\/estrarre-dati-da-cartelle-e-files-chiusi-2\/","url_meta":{"origin":705,"position":1},"title":"048. Estrarre dati da cartelle e files chiusi &#8211; 2","date":"11 Aprile 2014","format":false,"excerpt":"Domanda: La mia necessit\u00e0 \u00e8 quella di copiare da file chiusi xls sempre le stesse celle (a4:u200), che si trovano in una cartella in \"c:\/dati\" e incollarli,nel file attivo in quel momento chiamato archivio, sulla prima riga libera partendo dalla colonna A in sequenza, senza lasciare righe libere. Risposta: Ho\u2026","rel":"","context":"In &quot;Domande Lettori&quot;","img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":1434,"url":"https:\/\/www.office-guru.com\/wordpress\/2015\/02\/061-trasportare-un-elenco-di-numeri-in-orizzontale\/","url_meta":{"origin":705,"position":2},"title":"061. Trasportare un elenco di numeri in orizzontale","date":"12 Febbraio 2015","format":false,"excerpt":"Domanda: Ho cinquanta e pi\u00f9 righe. in ognuna di queste righe ci possono essere da uno a cinque numeri, ad es. A1 B1 C1 D1 D1 riga 1 > 32 44 31 28 5 riga\u00a02 > 2 30 27 4 1 riga\u00a03 > 7 13 41 8 riga\u00a04 > 6\u2026","rel":"","context":"In &quot;Domande Lettori&quot;","img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":829,"url":"https:\/\/www.office-guru.com\/wordpress\/2014\/01\/selezione-file-tramite-finestra-di-dialogo\/","url_meta":{"origin":705,"position":3},"title":"029. Selezione File tramite finestra di dialogo","date":"16 Gennaio 2014","format":false,"excerpt":"Domanda: Ho una macro che per eseguire le varie operazioni previste necessita dell\u2019apertura di pi\u00f9 file ogni volta di nome diverso. Avrei pertanto bisogno di creare una MsgBox all\u2019interno della macro per selezionare i file che devono essere uitilizzati.\u00a0 Ringrazio in anticipo per la Vostra attenzione. Risposta: Per selezionare un\u2026","rel":"","context":"In &quot;Domande Lettori&quot;","img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":480,"url":"https:\/\/www.office-guru.com\/wordpress\/2013\/03\/classifica-tramite-vba-v2\/","url_meta":{"origin":705,"position":4},"title":"014. Classifica tramite VBA &#8211; v2","date":"27 Marzo 2013","format":false,"excerpt":"Questo articolo segue al precedente \"Classifica tramite VBA\" di cui \u00e8 un evoluzione. L'esigenza del nostro lettore era quella di avere la classifica per categoria in un'unica colonna, dal momento che dovr\u00e0 gestire fino a 10 categorie contemporaneamente. Ho modificato quindi il codice permettendo di gestire N categorie contemporaneamente senza\u2026","rel":"","context":"In &quot;Domande Lettori&quot;","img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":629,"url":"https:\/\/www.office-guru.com\/wordpress\/2013\/05\/individuare-duplicati\/","url_meta":{"origin":705,"position":5},"title":"021. Individuare duplicati","date":"24 Maggio 2013","format":false,"excerpt":"Domanda: Buongiorno a tutti, avrei bisogno del vostro aiuto se possibile. io ho una colonna excel piena di codici alfanumerici, questa colonna \u00e8 in costante aggiornamaento perch\u00e8 ogni giorno vengo inseriti alcuni codici. io avrei bisogno di un modo per sapere e evidenziare se il codice che sto inserendo \u00e8\u2026","rel":"","context":"In &quot;Domande Lettori&quot;","img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]}],"_links":{"self":[{"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/posts\/705"}],"collection":[{"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/comments?post=705"}],"version-history":[{"count":4,"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/posts\/705\/revisions"}],"predecessor-version":[{"id":1200,"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/posts\/705\/revisions\/1200"}],"wp:attachment":[{"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/media?parent=705"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/categories?post=705"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.office-guru.com\/wordpress\/wp-json\/wp\/v2\/tags?post=705"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}