I would like that the value of every cell within a range is multiplied by a specific value (let's say 4/7). I have this code, but I'm getting a "Type mismatch error".

```
Range("B1:B4").Value = Range("B1:B4").Value * 4 / 7

```

Any thoughts?