Mostrar los tags: Excel 2010

Mostrando del 1 al 3 de 3 coincidencias
<<>>
Se ha buscado por el tag: Excel 2010
sin imagen de perfil

Ej. de Facturacion con lista desplegable


Excel

estrellaestrellaestrellaestrellaestrella(2)
Publicado el 4 de Agosto del 2017 por Roberto
3.618 visualizaciones desde el 4 de Agosto del 2017
Hola, aclaro no hay código de ningún tipo en el ejemplo, los que les dejo quisas ya lo isieron o talves no en definitiva ojala le ayude a alguien y si alguien lo modifica y lo mejora me gustaría que me lo hagan llegar.
En definitiva es un ejemplo de facturación con lista desplegable, osea a la hora de buscar el producto a facturar, escribo la descripción parcial del producto (uso comodín si necesito) dicha búsqueda crea una lista la cual se convierte en una lista desplegable de todos los productos que concuerdan con los criterios buscados.
La hoja2 es la que contiene los datos y donde se forma la lista auxiliar de donde se crea la lista desplegable en cada caso, la hoja1 seria la factura en si, tomar en cuenta que solo se escribe el los espacios verdes, se selecciona el productos en los espacios amarillos y los rojos no se tocan.
Bueno gente ojala le sirva a alguien y si la mejoran por favor me la mandan, ojo no tiene código de visual porque no lo manejo por eso me las arregle para hacerla asi. ojala sirva para algo
sin imagen de perfil

Macro Excel cuando no existe comdlg


Excel

Actualizado el 28 de Julio del 2016 por Hugo Arturo (4 códigos) (Publicado el 15 de Julio del 2016)
1.404 visualizaciones desde el 15 de Julio del 2016
hola

en otras macros que he realizado necesito el comdlg para obtener la ruta de los archivos, txt, excel, o bases de access y así poder manipular la información

no quería meterme a macros de excel de 2003, 2007 y menos de 2010, pues en lugar de mejorar, "el proveedor" quita lo que no le gusta y pumm, tuve que hace una macro en excel 2010.

no tiene el comdlg, y buceando un poco en excel encontre esta alternativa

buscar el archivo Application.GetOpenFilename, de esta manera abre una versión de comdlg

1
2
3
4
cells(12, 6).Value = Application.GetOpenFilename( _
     "Excel Files(*.xls;*.xlsx;*.xlsm;*.xla;*.xlam),*.xls;*.xlsx;*.xlsm;*.xla;*.xlam", , _
     "Selecccione el archivo Accountentry Blotter a cargar:")
RutaArch1 = Cells(12, 6).Value

en la celda (12,6) pongo la ruta para que el proto usuario valide que es corecta la ruta
y ese valor lo muevo a una variable RutaArch1, ya que con esa ruta abro el excel correspondiente

una delas cosas buenas es que si necesitaba 4 o mas archivos para no hacerce bola se tenia que tener nas de un comdlg, con esta opcion con Application.GetOpenFilename lo manipulas, en mi caso a 8 archivos diferentes

ya con la ruta del archivo ese excel lo abro como una tabla de base de datos y dependiendo de la version de excel se abre diferente proveedor

1
2
3
4
5
6
7
8
9
10
11
12
13
If VBA.Val(Application.Version) < 12 Then
ExcelStr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source = '" & RutaArch1 & "''';" & _
"Extended Properties=""Excel 8.0;HDR=No;IMEX=1"";"
ElseIf VBA.Val(Application.Version) < 14 Then
ExcelStr = "Provider=Microsoft.Jet.OLEDB.12.0;" & _
"Data Source = '" & RutaArch1 & "';" & _
"Extended Properties=""Excel 12.0;HDR=No;IMEX=1"";"
Else
ExcelStr = "Provider=Microsoft.ACE.OLEDB.12.0;;" & _
"Data Source = '" & RutaArch1 & "';" & _
"Extended Properties=""Excel 12.0;HDR=YES;\"";"
End If

lo demas es abrir un objeto excel y un recorset
Imágen de perfil

KARDEX V.2.2


Excel

estrellaestrellaestrellaestrellaestrella(3)
Actualizado el 20 de Octubre del 2015 por Edinson (Publicado el 15 de Octubre del 2015)
4.819 visualizaciones desde el 15 de Octubre del 2015
Libro de Excel 2010 que controla el flujo de elementos de una bodega que asigna en responsabilidad a colaboradores elementos seriados y no seriados quienes deben instalarlos o venderlos o construirlos y producto de estas transacciones deben recibirlos, devolverlos, darlos de baja etc. ademas permite un balance en tiempo real de los materiales en bodega.