Juan Cosceri

La formula que deberias usar es un if anidado. Primero verificaria si B1 esta vacio y si no esta vacio, entraria en la formula. =SI(B1="";"";SI(A1=B1;"OK";"NO"))

Te paso el codigo para el Text to column desde VBA Columns("D:D").Select Selection.TextToColumns Destination:=Range("D1"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False,...

Te envío una macro que se adapta a tus necesidades Sub Macro3() ' Written by Juan Manuel Cosceri (25-01-2018) Set TOOL = Workbooks(ActiveWorkbook.Name) Set ConsolidatedSH = TOOL.Sheets("Sheet2") 'Reemplazar SHEET2 por el nombre de la hoja donde ira...

Al parecer el reporte esta normalizado y se detalla proveedor - FC y Monto, por lo tanto, bastaria con armar un loop con un contador que cuando llegue a 3 se reinicie y pase a la siguiente linea. Te envio la macro que se adapta a tus necesidades Sub...

Te envío la macro que se adapta a tus requerimientos. Deberas reemplazar Range("B7").value por el text box, para que tome el input que vos buscas y al final que pegue el valor depurado en el campo de input box o mismo en la planilla para que la...

Deberas definir LastRow y Last Column por ejemplo para que el rango sea variable. FirstRow = 1 FirstCol = 1 LR = ActiveSheet.Cells(ActiveSheet.Rows.Count, FirstCol).End(xlUp).Row LC = ActiveSheet.Cells(FirstRow,...

Te envío la macro solicitada! Sub Macro1() ' Dim LoopRow As Integer Dim LoopColumn As Integer Dim Valor As String Dim Comienzo As String Dim CodX As Integer Dim CodY As Integer Dim NumX As Integer Dim NumY As Integer Set DataSH = Sheets("Data") 'Hoja...

Entiendo que lo que pretendes identificar es aquellas Horas que corresponde imputar para desestimar las vencidas. Ingles --> =IF(A3>TODAY()-120;"Pendiente";"Vencida") Español --> =SI(A3>HOY()-120;"Pendiente";"Vencida") En caso de que lo que pretendas...

Gomzky .. respondió: Yo le quitaría la opción de Encoding... No es necesario a no ser que el documento de origen venga con alguna codificación que no desees en el documento CSV exportado... En el peor de los casos, cambia el formato de FileFormat por este otro:...

Nani, Buen dia! El error se debe al rango para ordenar seleccionado. Vos estas queriendo ordenar por las columnas C, AF y AG y la matriz a Ordenar es son es la columna "A", por lo tanto te tira error. Te envio el codigo Debuggeado Sub Macro1() ' Set...

Te envío la macro solicitada! Sub Macro2() Dim Semana As String Dim NumSemana As Long 'Agrega la Hoja para la pivot al final del Workbook' Sheets.Add After:=Sheets(ActiveWorkbook.Sheets.Count) 'Definis el num de semana (Esto lo hago para que puedas...

William Kennedy respondió: Puedes pegar todo el código, para ver como tienes declardas las variables.