Om kolonner (1). Ror (1). Värdera = "" därefter
först = kolonner (1). Avsluta (xlDown). Tilltala
Annars
först = kolonner (1). Ror (1). Tilltala
Avsluta om
jumbo = kolonner (1) .SpecialCells (xlCellTypeLastCell). Tilltala
Spänna (först & ”: ” & sist). Kopiera destinationen: =Workbooks (1). Täcker (2). Celler (1)
|