ph_location_type {officer} | R Documentation |
Location of a placeholder based on a type
Description
The function will use the type name of the placeholder (e.g. body, title), the layout name and few other criterias to find the corresponding location.
Usage
ph_location_type(
type = "body",
type_idx = NULL,
position_right = TRUE,
position_top = TRUE,
newlabel = NULL,
id = NULL,
...
)
Arguments
type |
placeholder type to look for in the slide layout, one of 'body', 'title', 'ctrTitle', 'subTitle', 'dt', 'ftr', 'sldNum'. |
type_idx |
Type index of the placeholder. If there is more than one
placeholder of a type (e.g., |
position_right |
the parameter is used when a selection with above
parameters does not provide a unique position (for example
layout 'Two Content' contains two element of type 'body').
If |
position_top |
same than |
newlabel |
a label to associate with the placeholder. |
id |
(DEPRECATED, use |
... |
unused arguments |
Details
The location of the bounding box associated to a placeholder within a slide is specified with the left top coordinate, the width and the height. These are defined in inches:
- left
left coordinate of the bounding box
- top
top coordinate of the bounding box
- width
width of the bounding box
- height
height of the bounding box
In addition to these attributes, a label can be
associated with the shape. Shapes, text boxes, images and other objects
will be identified with that label in the Selection Pane of PowerPoint.
This label can then be reused by other functions such as ph_location_label()
.
It can be set with argument newlabel
.
See Also
Other functions for placeholder location:
ph_location()
,
ph_location_fullsize()
,
ph_location_id()
,
ph_location_label()
,
ph_location_left()
,
ph_location_right()
,
ph_location_template()
Examples
# ph_location_type demo ----
loc_title <- ph_location_type(type = "title")
loc_footer <- ph_location_type(type = "ftr")
loc_dt <- ph_location_type(type = "dt")
loc_slidenum <- ph_location_type(type = "sldNum")
loc_body <- ph_location_type(type = "body")
doc <- read_pptx()
doc <- add_slide(doc, "Title and Content")
doc <- ph_with(x = doc, "Un titre", location = loc_title)
doc <- ph_with(x = doc, "pied de page", location = loc_footer)
doc <- ph_with(x = doc, format(Sys.Date()), location = loc_dt)
doc <- ph_with(x = doc, "slide 1", location = loc_slidenum)
doc <- ph_with(x = doc, letters[1:10], location = loc_body)
loc_subtitle <- ph_location_type(type = "subTitle")
loc_ctrtitle <- ph_location_type(type = "ctrTitle")
doc <- add_slide(doc, layout = "Title Slide")
doc <- ph_with(x = doc, "Un sous titre", location = loc_subtitle)
doc <- ph_with(x = doc, "Un titre", location = loc_ctrtitle)
fileout <- tempfile(fileext = ".pptx")
print(doc, target = fileout)