Colección de citas famosas - Slogan de motivación - Resumen y resumen del método de diccionario múltiple de tres columnas de Excel vba
Resumen y resumen del método de diccionario múltiple de tres columnas de Excel vba
¿Sub? exchange()
¿Atenuado? ¿dic? Ah, ah? ¿I? ¿Como qué? ¿Fijado largo
? ¿dic? =?CreateObject("scripting . diccionario")
arr? =?Celda(1,?1).Área actual
¿Para qué? ¿I? =?2?¿Adónde ir? Monto adeudado
DIC(arr(I,1))?=?DIC(arr(I,1))? ?arr(I,2)? i, 4)
entonces
celda(2,?5).resize(dic. count?2)?_
=?sheet Función. transpose(array(dic.keys, ?dic.items).
Fin ?sub