ich ein Neuling auf VBA bin und sehen aus wie ähnlich Code mit VBA-Skript Überschrift benachbarten Zellen zu kopieren, wenn Duplikat gefundenkorrekte Syntax für Range (Cells(), Zellen())
Range(Cells(firstInstanceRow + 1, 2), Cells(lastInstanceRow, 2)).Copy
Dies wählt Spalte B und in angrenzende Zelle C einfügen, aber ich müsste B: D auswählen und in E: G einfügen, bis das Duplikat gefunden wurde.
Range(Cells(x, y), Cells(a, b)) Wählt alle Zellen von x, y oben links zu a, b unten rechts aus. Die Syntax ist jedoch etwas seltsam, da die ZEILE zuerst kommt (x oder a) und die SPALTE an zweiter Stelle steht (y oder b). Daher zeigt Ihre 2 in beiden Cells() Spalte B. Ändern Sie es einfach zu 4 in der zweiten Cells(), um von B:D auszuwählen.
Range(Cells(firstInstanceRow + 1, 2), Cells(lastInstanceRow, 4)).Copy
Wenn dies für Sie funktioniert, akzeptieren Sie bitte ein grünes Häkchen. – Chrismas007
Danke @ Chrismas007 hat es versucht, es hat nicht funktioniert für mich, ich habe meine Pflicht reposted, bitte schauen Sie und helfen Sie mir aus. –
@IvrameshKannan Ich würde empfehlen, diese Frage so zu stellen, wie Sie ursprünglich gefragt und die Frage mit Ihren neuen Kriterien erneut gestellt haben. Das Umschreiben der Frage wird jetzt keine neuen Ansichten erhalten. Ich werde Ihre Frage zurück auf das Original zurück und ich würde vorschlagen, eine neue Q. – Chrismas007
Werfen Sie einen Blick hier: http://stackoverflow.com/questions/15573778/how-can-i-copy-a-row-of-data-and-paste-it-with-an-offset – Clauric