Roberto Alvarado

En el código en ningún momento le envías la sentencia o sentencias que creas al motor para que las ejecute.

Si le dices hoja. Sheets(0) es hoja1, y si vas incrementando son las demás hojas creadas Puedes hacer un for hasta hoja.Sheets().Count y vas recorriendo una a una en este for.

If ComboBox1.Text = "" Then UserForm2.Show Else ' Aquí lo que hace la macro si hay valores en el combobox End If

¿En qué linea especifica del código se genera el error?

Si puedes hacerlo, como eso es un procedimiento o una función en VBScript, lo puedes hacer con un Call NombreDeTuFuncionProcedimeinto y si necesitas parámetros se los pasas.

Verificate tu cadena de conexión en esta pagina y verifica los otros estilos de cadenas de conexión de acuerdo a lo que estas utilizando, esta cadena es utilizando OleDB http://www.connectionstrings.com/mysql-oledb-mysqlprov/

¿El combobox al cual deseas escribir tiene la propiedad edit activa? Si no la tienes activa solo funciona para búsquedas de lo que tiene cargado.

Una cadena de conexión no puede decir Localhost, porque asume o busca el servidor de base de datos en la misma computadora donde se esta ejecutando. Debes colocar el nombre del servidor o la IP que tenga el servidor.

Te recomiendo que no utilices VB6 porque ya esta fuera de garantía por el fabricante y si tienes problemas no vas a encontrar soporte ni parches para ello. Te recomiendo lo hagas sobre plataforma .NET, existe VB.NET y existen versiones Express de...

Debes colocar doble comilla indicando con esto que es una comilla dentro del texto encerrado entre las comillas. En ti caso debería quedar "Jefe de departamento ""A"" "