VBA NO WORD - COMO SABER O NOME DE UMA IMAGEM?
Pessoal,
Estou fazendo uma macro no VBA do word e preciso que ele mude o layout de uma imagem. Não consegui saber qual o nome da imagem que eu adiciono para poder configura-la. Alguem sabe como qual o nome da imagem?
Vlw
Estou fazendo uma macro no VBA do word e preciso que ele mude o layout de uma imagem. Não consegui saber qual o nome da imagem que eu adiciono para poder configura-la. Alguem sabe como qual o nome da imagem?
Vlw
cara pelo nome acho q não dá, mas vc pode fazer uma gambi, tipo.. vc seleciona a figura, depois vai em Inserir/Indicador, daà poe um nome qualquer, depois é só chamar a figura pelo nome tipo:
qq coisa, abs
Selection.GoTo What:=wdGoToBookmark, Name:="sua figura"
qq coisa, abs
Dekinho,
Valeu !!!!
Vou testar e te falo.
Valeu !!!!
Vou testar e te falo.
Pessoal,
Não deu certo o jeito do Dekinho, mas consegui fazendo a seguinte macro:
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Options.PictureWrapType = wdWrapMergeBehind
With ActiveDocument.shapes.AddPicture(Anchor:=Selection.Range, FileName:= _
nomedoarquivo + ".JPG", LinkToFile:=False, SaveWithDocument:=True)
.WrapFormat.Type = 3
.ZOrder 5
End With
Next
Selection.HeaderFooter.shapes(1).Select
Selection.ShapeRange.IncrementLeft 40#
Não deu certo o jeito do Dekinho, mas consegui fazendo a seguinte macro:
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Options.PictureWrapType = wdWrapMergeBehind
With ActiveDocument.shapes.AddPicture(Anchor:=Selection.Range, FileName:= _
nomedoarquivo + ".JPG", LinkToFile:=False, SaveWithDocument:=True)
.WrapFormat.Type = 3
.ZOrder 5
End With
Next
Selection.HeaderFooter.shapes(1).Select
Selection.ShapeRange.IncrementLeft 40#
Tópico encerrado , respostas não são mais permitidas