Excel - Copiar y pegar datos de una hoja a otra que yo seleccione

   
Vista:

Copiar y pegar datos de una hoja a otra que yo seleccione

Publicado por CrossRntk (1 intervención) el 05/02/2014 02:04:12
Hola,
Tengo un problema pero para explicarlo debo plantear lo que deseo hacer.

Una macro que cree una nueva hoja con el nombre de una celda de excel, acto seguido que copie de B22 hasta F22 y que los pegue en una hoja que seleccione o que busque el nombre que coloque, que no me permita crearla si esta repetida y si no existe que me vuelva a preguntar.

Dicho esto solo tengo una macro que crea una nueva hoja con el nombre de la celda que yo necesito:

Sub Nuevopaciente()
Dim i As Long
' Si el nombre ya existe, genere un mensaje y no cree la hoja
For i = 1 To Sheets.Count
If Sheets(i).Name = Sheets("Inicio").Range("C6") Then
MsgBox "El nombre de la hoja ya existe. Por favor, Genere un nuevo nombre"
Exit Sub
End If
Next i

' Crea la nueva hoja con el nombre que está en la hoja1 en la celda A1
Sheets.Add
ActiveSheet.Name = Sheets("Inicio").Range("C6")
End Sub

Muchas gracias, espero su pronta ayuda.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Antoni Masana

Copiar y pegar datos de una hoja a otra que yo seleccione

Publicado por Antoni Masana (267 intervenciones) el 05/02/2014 06:47:51
Bien.

¿Y cual es el problema?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar