Copiar sin decimales

hola, Jaime Javier !

... quiero copiar y pegar de una hoja a otra unos importes, pero en la hoja de origen estan los importes con decimales "ocultos"
y en la hoja a la que los quiero pegar solo quiero que me parezca el importe como tal sin los decimales
por que lo que hace es pegarlos pero con los decimales que estan ocultos y yo no quiero que haga eso
por que el programa de la Secretaria de Hacienda no acepta decimales por que lo estoy haciendo a traves de una carga batch.

1) [generalmente] obtendrias mejores propuestas [y mas rapido solucionas tu *problema*] si en la consulta incluyes algunos *detalles*

a) de los que no se ven desde el otro lado del mensaje como: nombres de las hojas, tipo de datos, rangos, de donde, a donde, etc.
b) y *clarificas* algunos terminos que pudieran no ser tan *obvios* [p.e. que significa *carga batch* ???]
c) hablando de enteros y decimales "ocultos", asumiendo formatos personalizados...
comentar si [p.e.] alguna cantidad *real* del tipo 49.7 que se *veria* como 50 la quieres pasar como 49 o 50 -?-

2) suponiendo que estamos hablando de las hojas con nombre: hoja1 y hoja2 [sin espacios]
y que los rangos que quieres pasar son 'A2:C35' de hoja1 a hoja2 -???-
prueba con las siguientes dos *sencillas* instrucciones en alguna macro: OJO: 49.7 *pasa* como 49 [solo la parte entera]

Sub Copia_Enteros_hoja1_a_hoja2()
[hoja2!a1:c35].formulaarray = "=int(hoja1!a1:c35)"
[hoja2!a1:c35] = [hoja2!a1:c35].value
End Sub

si requieres de algun *redondeo* hacia arriba... cambia la formula utilizada:
de: -> "=int(hoja1!a1:c35)"
a: -> "=round(hoja1!a1:c35,0)"

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.