poner en un listbox numeros automaticamente en la columna de la derecha

hola, daniel !

... tengo la siguiente duda.
En la siguiente macro por que si creas una carpeta dentro de otra y con el mismo nombre no aparece en el tree.
Ejemplo: en la carpeta C:\Documents and Settings\DANIEL\Mis documentos\USUARIOS
creas una carpeta llamado USUARIOS esta no aparece. esto pasa solo con las que estan repetidas...

del codigo que expones en tu siguiente mensaje...

-> cual es el que empleas para la creacion de la carpeta y como le pasas las instrucciones "precisas" ?

saludos,
hector.

Hola Hector Miguel
Las carpetas algunas las creo a mano pero otras con
en el label1 esta la ruta completa y MiValor es un inputbox
MkDir (Label1 & "/" & MiValor)


como se podria solucionar el problema de que no aparecen las carpetas
un saludo
Daniel

"Héctor Miguel" escribió en el mensaje
news:%

hola, daniel !

... tengo la siguiente duda.
En la siguiente macro por que si creas una carpeta dentro de otra y con
el mismo nombre no aparece en el tree.
Ejemplo: en la carpeta C:\Documents and Settings\DANIEL\Mis
documentos\USUARIOS
creas una carpeta llamado USUARIOS esta no aparece. esto pasa solo con
las que estan repetidas...

del codigo que expones en tu siguiente mensaje...

-> cual es el que empleas para la creacion de la carpeta y como le pasas
las instrucciones "precisas" ?

saludos,
hector.

hola, daniel !

Las carpetas algunas las creo a mano pero otras con
en el label1 esta la ruta completa y MiValor es un inputbox
MkDir (Label1 & "/" & MiValor)
como se podria solucionar el problema de que no aparecen las carpetas

no comentas si la falla ocurre cuando las creas a mano... o por codigo -???-
tampoco comentas si la creacion ocurre antes o despues de otro codigo que busque por (sub)carpetas -???-
(probablemente) podria ser que trates de escribir en carpetas de solo lectura (o algun problema similar) -???-

el siguiente codigo me funciona perfectamente (windows-xp)

MkDir Application.DefaultFilePath & "/" & "AAA"
If Dir(Application.DefaultFilePath & "/" & "AAA", vbDirectory) = "" Then
MsgBox "Fallo en la creacion de carpetas !!!"
Exit Sub
Else
MsgBox "Carpeta 1 creada con exito"
MkDir Application.DefaultFilePath & "/" & "AAA" & "/" & "AAA"
If Dir(Application.DefaultFilePath & "/" & "AAA" & "/" & "AAA", vbDirectory) = "" Then
MsgBox "Fallo en la creacion de carpetas !!!"
Exit Sub
Else
MsgBox "Carpeta 2 creada con exito"
' aqui sigues con las acciones de tu codigo ... '
End If
End If

si cualquier duda (o informacion adicional mas... concreta y datallada)... comentas ?
saludos,
hector.

__ la consulta anterior __

... tengo la siguiente duda.
En la siguiente macro por que si creas una carpeta dentro de otra y con el mismo nombre no aparece en el tree.
Ejemplo: en la carpeta C:\Documents and Settings\DANIEL\Mis documentos\USUARIOS
creas una carpeta llamado USUARIOS esta no aparece. esto pasa solo con las que estan repetidas...

del codigo que expones en tu siguiente mensaje...

-> cual es el que empleas para la creacion de la carpeta y como le pasas las instrucciones "precisas" ?

Hola Hector Miguel
Siento haber tardado tanto en responder.
la creacion de las carpetas las hago mediante macro pero lo que no puedo.
Solucionar es que si el usuario crea una carpeta "aaa" dentro de "aaa" esta
en el TreeView1 no aparece.
e probado tu macro pero no consigo que aparezca.

un saludo y muchisimas gracias
Daniel
"Héctor Miguel" escribió en el mensaje
news:%23Qk32c%

hola, daniel !

Las carpetas algunas las creo a mano pero otras con
en el label1 esta la ruta completa y MiValor es un inputbox
MkDir (Label1 & "/" & MiValor)
como se podria solucionar el problema de que no aparecen las carpetas

no comentas si la falla ocurre cuando las creas a mano... o por
igo -???-
tampoco comentas si la creacion ocurre antes o despues de otro codigo que
busque por (sub)carpetas -???-
(probablemente) podria ser que trates de escribir en carpetas de solo
lectura (o algun problema similar) -???-

el siguiente codigo me funciona perfectamente (windows-xp)

MkDir Application.DefaultFilePath & "/" & "AAA"
If Dir(Application.DefaultFilePath & "/" & "AAA", vbDirectory) = "" Then
MsgBox "Fallo en la creacion de carpetas !!!"
Exit Sub
Else
MsgBox "Carpeta 1 creada con exito"
MkDir Application.DefaultFilePath & "/" & "AAA" & "/" & "AAA"
If Dir(Application.DefaultFilePath & "/" & "AAA" & "/" & "AAA",
vbDirectory) = "" Then
MsgBox "Fallo en la creacion de carpetas !!!"
Exit Sub
Else
MsgBox "Carpeta 2 creada con exito"
' aqui sigues con las acciones de tu codigo ... '
End If
End If

si cualquier duda (o informacion adicional mas... concreta y datallada)...
comentas ?
saludos,
hector.

__ la consulta anterior __

... tengo la siguiente duda.
En la siguiente macro por que si creas una carpeta dentro de otra y con
el mismo nombre no aparece en el tree.
Ejemplo: en la carpeta C:\Documents and Settings\DANIEL\Mis
documentos\USUARIOS
creas una carpeta llamado USUARIOS esta no aparece. esto pasa solo con
las que estan repetidas...

del codigo que expones en tu siguiente mensaje...

-> cual es el que empleas para la creacion de la carpeta y como le pasas
las instrucciones "precisas" ?