selection.insert

I'm trying to create a macro that sets up my reports with a header and spaces above and before the data Essentially what I want to do is add a column in the front of my data, add 6 Rows above my data, turn gridlines off, and open my workbook that contains my header and copy and paste it into...

My boss (not a spreadsheet man :-)) has created the following code to move some data around his spreadsheet, to be honest I'm quite impressed he has got this far! I am going to improve it when I get chance, but an immediate issue is when the code runs, the last cell of excel becomes T1048574...

Hello all, i want to find out if there is a better way to copy from sheets1 through 9 and paste to sheet "master" one sheet below the other. here is the code i have cobbled together which does work but maybe there is a more efficient way? ' select the range to copy and paste to "master"...

Hi Everyone, Any help here would be greatly appreciated! I've tried checking trust settings, etc. on other people's computers, they're set to allow macros. I'm getting run-time error 438 when i run this code on other's computers. Any idea why? I red fonted/underlined the line of code that the...

I am trying to make sheet 1 a place to enter data and sheet 2 into a publishable sheet. All my code works until I try and insert the range I copied from sheet 1. I tested it and range is selected if I don't enter the, Selection.Insert Shift:=xlDown command. Once I put this part of visual...

Dears, I want to change the range that the macro pulls automatically, as below: Sub Weekly() ' ' Weekly Macro ' ' Range("A2").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection...

How can i copy 6 rows from Tab2 to a list in Tab1 below each row. Finally i want it to the last record. Sub CopyPaste11() Dim i As Long For i = 1 To 6 'Copies the specified selection to the Clipboard Sheets("Tab2").Select Range("A3:U8").Select...

Hi! Im stuck with this problem, it would be great if you could help me :-) For o = 3 To Z Columns(o).Select Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove Next ________ I want to select...

when i run the macro i get Unable to set the formular array property of the range class Columns("B:B").Select Selection.Copy Columns("M:M").Select Selection.Insert Shift:=xlToRight Application.CutCopyMode = False Selection.Copy Columns("N:N").Select Selection.Insert...

I've got a spreadsheet which has been processed up to a certain point. Then I want to autofilter it and add a tag to just the visible cells. This code shifts a column over, adds the columns for the new tags, but then doesn't fill the visible cells with the tag. Any help appreciated! Sub...

Hi. I have an Excel Worksheet with 241 columns and around 46 thousand rows of numbers (no blanks anywhere). I only require 9 (nine) columns from the sheet which should be placed in Columns B to J. From recording a macro, and deleting unnecessary cursor movements, I ended up with the following...

Hi I have a data set which contains hundreds of cities and I want to run a pivot on each city and export each city's pivot to a new workbook. To accomplish this I ran a Macro to break each cities data out into its own sheet. Now for each city I would like to insert blank rows above the data and...

I have a file where some VBA is ran which creates an output into a new file and does some formatting etc and then the VBA return to the original file where the VBa was first ran from. The issue is the user will sometimes change the file name which creates an error in my code. Please see my code...

How to get this Marco to work in 2016? Sub Send_Part_Number_Request() 'Clear current data Rows("102:155").Select Selection.ClearContents 'Copy data below to be sorted before it is added to body of email Range("B47:C97").Select Selection.Copy Range("B102").Select...