
Kopírování do jiného sešitu
Ahoj, chtěl bych vytvořit makro, které by poté, co by buňka nabyla konkrétní hodnoty (např. "ano"), kopírovalo řádek, ve kterém se buňka nachází, do jiného sešitu. Snad zadání není moc komplikované. Snažil jsem se vytvořit sám kopírování na jiný list ve stejném sešitu (viz níže), ale ani to mi bohužel nefungovalo. Díky moc za jakoukoliv radu. bloom
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$O$9" Then
Select Case Target.Value
Case ano
Range("A9:K9").Select
Selection.copy
Sheets("List2").Select
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Sheets("List1").Select
End Select
End If