Copiar datos hoja, saltar rangos vacios, asignar id

Buenos días,
Necesito ayuda con unas macros que hagan lo siguiente.
1. Primera macro.
Seleccionar varias celdas y copiarlas a una otra hoja (ya esta resuelto en parte).
Ejemplo:
En el fichero adjunto, necesito que se seleccionen, en la hoja "Alimentos", las celdas de la ciudad "C4", la de la fecha "F4" y los rangos B10:D19; F10:H19; B27:D36; B44:D53 y F44:H53. Estos datos se deben copiar a la hoja "Pago" y a la hoja "Histórico". Para simplificar un poco, he creado una tabla en la hoja "Alimentos" a partir de la fila 62, que recoge los datos mencionados anteriormente.
Como observamos, interviene en la tabla B62:G112 de esta hoja la columna G donde siempre aparecerá no pagado.
Lo que quiero es que los datos de esta tabla se copien a la hoja "Pago", saltando las lineas vacías de la tabla.
Después del pegado de los datos, se limpian los datos de la hoja "Alimentos" para volver a introducir datos. La siguiente vez que se deben copiar los datos de la hoja "Alimentos" a la hoja "Pago", estos datos se deben copiar al final de la tabla en la primera linea vacía.
Además, se debe asignar un número empezando desde 1 y ascendente (1, 2, 3, etc.) en la hoja "Pago", en la columna "A" que es el ID único. En la columna G de la hoja "Pago", aparecerá No por defecto como pagado.
2. Segunda macro.
Ahora interviene otra macro que necesito que haga lo siguiente:
En la hoja "Pago", al cambiar el estado de Pagado de No a Sí, quiero que se recorra la columna "G" y cuando encuentre el valor "Sí" y además, la columna "H" de fecha pago esté vacía, que ponga la fecha del sistema (formato DD-MMM-AAAA) en las celdas de la columna "H" (que cumplen la condición de "Sí" en pagado), que copie las filas que cumplen esta condición de "Sí" a un libro nuevo que tenga el nombre ["Pagado" espacio "Fecha de pago" (la fecha del sistema del pago cuando se cambia la condición de No a Sí)].
Adjunto excel para el ejemplo.
Muchas gracias por vuestro esfuerzo y por vuestro tiempo.
Un saludo.