Aleatorio

Prueba con el siguiente macro:

En tu archivo de Excel, entras al Editor de Visual Basic
(Herramientas - macro - editor de visual basic).

luego insertas un nuevo módulo (Insertar - Módulo), y
pegas el siguiente código:

Sub RepetirNombres()
' David García
Dim xhoja, xnueva, xdato As String
Dim flag, i, j, n As Integer
Application.ScreenUpdating = False
xhoja = ActiveCell.Worksheet.Name
Sheets.Add
xnueva = ActiveCell.Worksheet.Name
Sheets(xhoja).Select
flag = 0
Do While flag = 0
xdato = ActiveCell.Value
ActiveCell.Offset(0, 1).Range("A1").Select
n = ActiveCell.Value
ActiveCell.Offset(1, -1).Range("a1").Select
If Len(xdato) = 0 Then
flag = 1
Else
Sheets(xnueva).Select
For j = 1 To n
ActiveCell.Value = xdato
ActiveCell.Offset(0, 1).Range("a1").Select
ActiveCell.Value = j
ActiveCell.Offset(1, -1).Range("A1").Select
Next
Sheets(xhoja).Select
End If
Loop
Application.ScreenUpdating = True
End Sub

Para ejecutarlo, vuelves a tu archivo de Excel, y te
pones en el primer nombre. Luego ejecutas el macro
(Herramentas - macro - macros - Repetirnombres).

Nos cuentas si te funciona...

Hola a todos tengo una lista de 50 personas las cuales

tienen cierto numero

de participaciones por ejemplo Bob 5, Tommy 2..

hasta completar 50

personas con su respectiva participacion y lo que deseo

es que Bob me lo

despliegue 5 veces en otra lista o en su defecto en la

misma (no importando

el orden) Pero teniendo en cuenta que que el numero

seguido del nombre puede

variar hasta 30. Es posible hacer eso en la misma hoja

de calculo?????

AYUDENME POR FAVOR !!!!!!!
.