Excel - Kopírovanie a vkladanie údajov po kliknutí

Problém

Mám súbor údajov na A2 až A10. Keď narazím na bunku B1, ktorá obsahuje slovo „január“, údaje sa skopírujú do B2 až B10. Ak narazím na bunku D1, ktorá obsahuje slovo „March“, údaje sa skopírujú do D2 až D10.

Iným slovom, chcel by som, aby boli údaje skopírované a vložené do stĺpcov, na ktoré som klikol.

Riešenie

Predpokladal som, že máte jeden stĺpec za každý mesiac, takže kód bude aktivovaný len vtedy, keď je vybraná bunka v rozsahu B1: M1.

Tento kód by mal fungovať takto:

 Private Sub Worksheet_SelectionChange (Cieľový cieľ ByVal ako rozsah) Ak je priesečník (cieľ, rozsah ("B1: M1")) nie je nič, potom ukončite čiastkové rozpätie ("A2: A10"). náhradník 

Ak chcete, aby kód fungoval pre celý prvý riadok, zmeňte:

 Rozsah ("B1: M1") do riadkov (1).