Algunos Ejemplos De Macros En Vba

VBA y hojas Excel
Nombre de la hoja (variable)
'asigna nombre variable a la hoja a variable
strHoja = ActiveWindow.Caption
Windows(strHoja).Activate 'para activar el libro del nombre asignadoInsertar hoja nueva (elegir posición)
ActiveWorkbook.Sheets.Add Before:=Worksheets("Informe1")
Insertar hoja nueva (primera posición)
Sheets("Informe1").Copy After:=Worksheets(Worksheets.Count)Mover hoja
Worksheets("informe5").Move After:=Worksheets("Informe4")
Ordenar hojas (orden alfabético)
intNumeroHojas = ActiveWorkbook.Worksheets.Count
For i = 1 To intNumeroHojas
For j = i TointNumeroHojas
If LCase(Worksheets(j).Name) < LCase(Worksheets(i).Name) Then
Worksheets(j).Move Before:=Worksheets(i)
End If
Next j
Next i
Suprimir una hoja determinadaApplication.DisplayAlerts = False
 
For i = 1 To Sheets.Count
Sheets(i).Activate
xxx = ActiveCell.Worksheet.Name
If xxx = "Informe" Then
ActiveWindow.SelectedSheets.Delete
End IfNext
 
Application.DisplayAlerts = True
Seleccionar primera hoja
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Seleccionar última hoja
ActiveWindow.ScrollWorkbookTabs Position:=xlLastObtener el nombre de las hojas de un libro puedes hacer lo siguiente

Sub testNombres()
Dim objHojas As Worksheet

For Each objHojas In Worksheets

MsgBox objHojas.Name

Next objHojas

EndSub



Para saber el nombre de una hoja podes usar lo siguiente
VarExcel.Sheets(1).Name

VarExcel es la variable asociada a la aplicación Excel. De todas maneras si lo que queres es seleccionaruna u otra hoja de Excel lo que necesitas es saber el índice de la hoja y no el nombre ya que se cambia de la siguiente manera

VarExcel.Sheets(3).Select

En este caso se seleccionaría la hoja nº3. Yo puse 3, pero en realidad podes poner el número que necesites, siempre y cuando exista la hoja.







Abrir archivo de texto (CSV) en Excel
Al abrir en Excel un archivo plano de texto...