Saltar al contenido

No me arroja el resultado esperado

publicado

Buenas tardes, en el archivo adjunto explico que es lo que debo obtener como resultado, sin embargo, no me arroja error, pero tampoco me da el resultado que necesito

 

Sheets("Alldata").Cells(jLastrow, 3).Select.FormulaR1C1 = "=IF(LEFT(RC[-2],1)<>""3"", ""D"",""N"")"
Sheets("Alldata").Cells(jLastrow, 4).Select.FormulaR1C1 = "=MID(RC[-3],3,1)"

Agradeceré se sirvan verificar mi macro

Gracias, Saludos

Jorge desde Perú

Copiar columnas jgbh.xls

Featured Replies

publicado

Hola

 

Intenté abrir tu archivo Excel pero me daba error y me cerraba los archivos que tenia abiertos. Verifica si este archivo tiene algún problema por favor.

 

Saludos.

publicado
  • Autor

Gracias Dr. Hyde, lamentablemente estos días estuve sin Red.

Por favor dar el tema por solucionado

Gracias, Dios le bendiga

Jorge desde Perú

 

  • Silvia bloqueó este tema

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.