Boa tarde
Tem como implementar alterações nessa macro. 
Bom dia!!
Eu acho que eu não entendi
Sub Rand()
Application.ScreenUpdating = False
ActiveSheet.Range("C5,D7,E9,F11,G13,H15,I17,J19,K21,L23,M25,N27,O29") = 1 + Int(Rnd * 10)
Application.ScreenUpdating = True
End Sub
Att
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
É assim:
O valor aqui "(Int(Rnd * 10)" é informado individualmente, só que no formato 0,0 - 0,1 até 2,0 ou seja números que não são inteiros.
Então na célula o valor que aparecer, é o parâmetro informado na macro que vai do valor x ao valor y.
eu tinha postado algo, mas como não tinha entendido direito e acho que ainda não entendi acabei apagando
mas de qualquer forma testa aí
não sei lidar com radom
Somente é impossíveis até que alguém faça
A logica está presa na irracionalidade humana, e morta nos que se consideram donos da verdade.
"ALGUM MODERADOR ME EXPULSE DO FÓRUM POR FAVOR"
acho que consegui oq vc quer
Somente é impossíveis até que alguém faça
A logica está presa na irracionalidade humana, e morta nos que se consideram donos da verdade.
"ALGUM MODERADOR ME EXPULSE DO FÓRUM POR FAVOR"
Rapaz, nun eh ki ficou uma belezura. Tava achando que o titulo do rei das postagens sem solução, ia ficar comigo. 