Powerpoint VBA: Clearing shape color -


good day vba experts out there,

i'm trying write code search shape color , position somewhere.

example

if shape.fill.forecolor.rgb = rgb(210, 210, 210)   shape         .width = 700          .height = 20         .top = 80         .left = 30         .name = "titletextbox"         .fill.visible = msofalse         .fill.transparency = 1.0  '(somehow when type 1.0 become 1#, not sure why on also) end  end if

how use code:

i using code add fill color grey = rgb(210,210,210) shapes clear color , reposition shape wanted

however, when run code again, shape has added grey color reposition again, though doesn't have fill it.

somehow, felt shape has remembered color apply them, isn't wanted.

appreciate if 1 can provide me insight on how can overcome problem.

thanks

try this:

option explicit public sub testme()      dim sh      shape     dim sld     slide      set sld = application.activewindow.view.slide      each sh in sld.shapes         if sh.fill.forecolor.rgb = rgb(210, 210, 210)             sh                 .fill.forecolor.rgb = rgb(0, 0, 0)                 .width = 700                 .height = 20                 .top = 80                 .left = 30                 .name = "titletextbox"                 .fill.visible = msofalse                 .fill.transparency = 1#             end         end if     next sh end sub

once find grey shape, make sure change color rgb(0,0,0). thus, not grey more , not taken account, if run code again. have done line:

        .fill.forecolor.rgb = rgb(0, 0, 0)

Comments

Post a Comment

Popular posts from this blog

php - Vagrant up error - Uncaught Reflection Exception: Class DOMDocument does not exist -

i've set bento/ubuntu-16.04 vagrant box using php 5.6, , getting following error quite few times when try , run shell script: "uncaught reflection exception: class domdocument not exist". i've tried adding following top of script (not together), each no success: "sudo apt-get install php5.6-xml", "sudo apt-get install php5-xml", "sudo apt-get install php-dom" i've tried resetting server "sudo service apache2 restart". does have suggestions?
Read more

vue.js - Create hooks for automated testing -

Image
qa guys complained can't automate frontend testing. because our html looks same outside. lazy hack did this <template> <div :role="$options.name"> ... </div> </template> <script> export default { name: 'vmcomponentname' } </script> which takes name script , applies html. in browser get: <div role="vmcomponentname"> ... </div> line :role="$options.name" goes in every component. is there dry er solutions? please share. additional details i'll explain in details looking for. imagine have vmusercreate form creates user. test case can create user . to automatically test without role, have use following selector: .wrapper > .wrapper > .wrapper > .submit-button the test extremely brittle (will break lot). if use roles can use [role="vmusercreateform"] .submit-button selector. many folds less brittle. so basically, i'm ...
Read more

Add new key value to json node in java -

i have json file : { "id":1, "name":"abc", "addressdetails": { "city":"newyork" } } i wanted add 1 more key-value ("pincode" : "414141") node 'addressdetails'. i tried using : objectmapper mapper = new objectmapper(); jsonnode root = mapper.readtree(new file("d://test.json")); objectnode node = mapper.createobjectnode(); node.with("addressdetails").put("pincode", "414141"); but it's not getting added, there way can ? you can try you should modify file path objectmapper mapper = new objectmapper(); objectnode nodes = mapper.readvalue(new file("d:\\test.txt"), objectnode.class); nodes.with("addressdetails").put("pincode", "414141"); mapper.writer().writevalue(new file("d:\\test.txt"), nodes);
Read more