Necesito macro en excel que busque las 30 hojas de un libro me seleccione la hoja de la fecha actual y me copie un registro

Sin saber como es el formato de tu libro es dificil decirte. A parte en el titulo dices copiar y en la pregunta dices pegar.

Voy a darte un ejemplo suponiendo unas cuantas cosas. Que la fecha de las hojas está escrita en este formato 01-01-2016, los registros ya los tienes copiados de antes y quieres pegarlos al principio de la hoja, el código sería:

Sheets(Day(Now) & -Month(Now) & -Year(Now)).Select
Range("A1"). PasteSpecial xlPasteAll