R Officer Slide HyperLink

41 Views Asked by At

I am having a problem in the R Officer package which used to work but suddenly stopped. I want to link for any slide that has a question_text ph_label to the slide second to last. This was working for a very long time and just now recently stopped working. The text just refuses to hyperlink.

I have

version _
platform x86_64-w64-mingw32
arch x86_64
os mingw32
crt ucrt
system x86_64, mingw32
status
major 4
minor 3.2
year 2023
month 10
day 31
svn rev 85441
language R
version.string R version 4.3.2 (2023-10-31 ucrt) nickname Eye Holes

Microsoft® PowerPoint® for Microsoft 365 MSO (Version 2311 Build 16.0.17029.20028) 64-bit

Here is my loop for the hyperlink. The try function is for title slides that do not have the ph_label = "question_text".

      for (ql in 1:length(my_pres)){
        my_pres <- on_slide(my_pres, ql)
        try(my_pres <- ph_slidelink(x = my_pres, ph_label = "question_text", slide_index = (length(my_pres)-1)))
      }

Here is an example of one slide summary:

>         slide_summary(my_pres,43)
  type id      ph_label  offx      offy   cx   cy rotation fld_id fld_type
1 body  2  ChatGPT_Text 0.335 0.5991874 9.33 1.00       NA   <NA>     <NA>
2 body  3                  NA        NA   NA   NA       NA   <NA>     <NA>
3 body  4               0.200 5.0800000 1.44 0.37       NA   <NA>     <NA>
4 body  5               0.220 0.0000000 9.49 0.60       NA   <NA>     <NA>
5 body  6 question_text 0.200 5.4000000 1.66 0.24       NA   <NA>     <NA>

0

There are 0 best solutions below