VBA : Input form : Copy column and paste special value in another column

According to your attachment :

• first in Cal worksheet select all columns after column B then delete them all.

• As only a single VBA procedure is necessary so you must delete entirely the content of Module1
  then paste this starter VBA demonstration - you can rename it - then allocate it to both worksheets buttons :

PHP Code: 

Sub Demo1()
   With Sheet3
          C% = .UsedRange.Columns.Count + 1
         .[B2].Copy .Cells(2, C)
         .Cells(2, C) = "Supplier " & C - 2
    With .Cells(3, C).Resize(7)
         .Borders.Weight = 2
         .HorizontalAlignment = xlCenter
         .Value2 = [C3:C9].Value2
    End With
         .Columns(C).AutoFit
   End With
        [C3:C9].ClearContents
End Sub 


► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » ! ◄ ◄