Macros en Visual Basic

Insertar

Insertar: Nombre, Columna, Fila, Comentario

Comentario: Insertar un comentario
Véalo aquí

Sub comentarios()
Range("B2").Select 'previamente inserte un comentario en la celda "B2"
ActiveCell.Offset(0, 1).Value = ActiveCell.Comment.Text
'copia el comentario de la celda activa en la celda que
'se encuentra en la columna siguiente.
End Sub

Nombre: insertar nombre a la hoja
Véalo aquí

Sub nombre_hoja()
Dim MiNombre As String
MiNombre = InputBox("Ingrese nombre de hoja")
ActiveSheet.Name = MiNombre
End Sub

Nombre: insertar nombre a mas de una hoja
Véalo aquí

Sub nombres_hojas()
Dim MiNombre As String
Dim hoja As Worksheet
For Each hoja In Worksheets
MiNombre = InputBox("Ingrese nombre de hoja")
hoja.Name = MiNombre
Next hoja
End Sub

Insertar una columna
Véalo aquí

Sub insertando()
'inserta una columna por delante de la selección
Selection.EntireColumn.Insert
End Sub

Insertar un nombre a una celda
Véalo aquí

Sub nominar()
Worksheets("BALANCE").Range("e3").Name = "AC"
Worksheets("BALANCE").Range("e19").Name = "PC"
Worksheets("BALANCE").Range("e4").Name = "AC_Disponibilides"
Worksheets("BALANCE").Range("e5").Name = "AC_Inversiones"
Worksheets("BALANCE").Range("e7").Name = "AC_Cred_Ventas"
Worksheets("METODO").Range("C14").Name = "r_1"
End Sub
<< atras

Tabla de contenidos

adelante >>