⭐️ Asignar Calificación 🔟 a Trabajadores en Programa de Capacitación 👨‍🏫 (Macros)

Este vídeo te muestra el desarrollo de la lógica para asignar distintas calificaciones acordes a un criterio de evaluación por permutaciones o combinaciones, usando un barrido celda por celda, gracias a dos ciclos For anidados y análisis anidado también de condiciones If.
te dejo el código para acortar tu tiempo de desarrollo de lógica.
Saludos

N_Renglon = Sheets("Datos 1").Range("A" & Rows.Count).End(xlUp).Row
N_Columna = Sheets("Datos 1").Cells(6, Columns.Count).End(xlToLeft).Column

For A = 2 To N_Columna Step 2
For B = 8 To N_Renglon
If Sheets("Datos 1").Cells(B, A) = "" And Sheets("Datos 1").Cells(B, A + 1) = "" Then
Else
If Sheets("Datos 1").Cells(B, A) = "" And Sheets("Datos 1").Cells(B, A + 1) = "R" Then
Sheets("Datos 2").Cells(B, A) = "B"
Else
If Sheets("Datos 1").Cells(B, A) = "P" And Sheets("Datos 1").Cells(B, A + 1) = "" Then
Sheets("Datos 2").Cells(B, A) = "F"
Else
If Sheets("Datos 1").Cells(B, A) = "P" And Sheets("Datos 1").Cells(B, A + 1) = "R" Then
Sheets("Datos 2").Cells(B, A) = "A"
End If
End If
End If
End If
Next B
Next A

Видео ⭐️ Asignar Calificación 🔟 a Trabajadores en Programa de Capacitación 👨‍🏫 (Macros) канала Raúl Ayala - Excel