toda - insertar un caracter en una posicion excel

Cómo agregar una nueva columna a una hoja existente

Question

Supongamos que tengo la hoja de trabajo a continuación:

Empid  EmpName  Sal
1      david     100
2      jhon      200
3      steve     300

¿Cómo puedo insertar una nueva columna llamada "Loc", incluidos sus datos?

Empid  EmpName   Loc   Sal

1      david     uk    100
2      jhon      us    200
3      steve     nj    300

Answer 1

Por tu pregunta según lo preguntado

Columns(3).Insert
Range("c1:c4") = Application.Transpose(Array("Loc", "uk", "us", "nj"))

Si tuviera una forma de buscar automáticamente los datos (es decir, hacer coincidir el Reino Unido con la identificación del empleador), podría hacerlo en VBA

Answer 2

Utilice el método de inserción de rango, por ejemplo

Sub InsertColumn()
        Columns("C:C").Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
        Range("C1").Value = "Loc"
End Sub