Thread: [Solved] Making a macro linking two range more efficient.
View Single Post
 
Old 03-13-2024, 08:26 AM
p45cal's Avatar
p45cal p45cal is offline Windows 10 Office 2021
Expert
  
Join Date: Apr 2014
Posts: 956
p45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond repute
Default
try:
Code:
Sub blah()
Dim rng0 As Range, cll0 As Range
Set cll0 = Selection
Set rng0 = Application.InputBox(Prompt:="Select source range", Type:=8)
rng0.SpecialCells(xlCellTypeVisible).Copy
Application.Goto cll0
ActiveSheet.Paste Link:=True
Application.CutCopyMode = False
End Sub
Reply With Quote