Rumah masalah biasa ppt怎么做拖动互动

ppt怎么做拖动互动

Jan 15, 2020 am 09:23 AM
ppt seret

ppt怎么做拖动互动

PPT中实现图片的拖动功能的方法:

一、普通视图模式

在普通视图模式(不是全屏模式)下,即在编辑状态下,自然能实现图片的拖动功能。

优点:简单易行。

缺点:1.窗口较小,可视性不好;2.自定义动画效果无法实现。

二、宏

建议将宏的安全级别设置为低。

1、新建一个ppt空白文档。

2、点击菜单:“工具——宏——宏”,出现对话框。

3、对话框中“宏名”随意写个,比如:move,再点“创建”,就进入代码模式。

4、删去所有的代码,把下面的代码全拷贝进去。

Option Explicit
Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer
Private Declare Function WindowFromPoint Lib "user32" (ByVal xPoint As Long, ByVal yPoint As Long) As Long
Private Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As PointAPI) As Long
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Public Declare Function MonitorFromPoint Lib "user32.dll" (ByVal x As Long, ByVal y As Long, ByVal dwFlags As Long) As Long
Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
Private Const SM_SCREENX = 0
Private Const SM_SCREENY = 1
Private Const sigProc = "Drag & Drop"
Public Const VK_SHIFT = &H10
Public Const VK_CTRL = &H11
Public Const VK_ALT = &H12
Private Type PointAPI
    x As Long
    y As Long
End Type
Public Type RECT
    Left As Long
    Top As Long
    Right As Long
    Bottom As Long
End Type
Public mPoint As PointAPI, dPoint As PointAPI
Public ActiveShape As Shape
Dim dragMode As Boolean
Dim dx As Double, dy As Double
Sub DragandDrop(sh As Shape)
dragMode = Not dragMode
If dragMode Then Drag sh
End Sub
Private Sub Drag(sh As Shape)
Dim i As Integer, sx As Integer, sy As Integer
Dim mWnd As Long, WR As RECT
dx = GetSystemMetrics(SM_SCREENX): dPoint.x = dx
dy = GetSystemMetrics(SM_SCREENY): dPoint.y = dy
GetCursorPos mPoint
With ActivePresentation.SlideShowWindow
    mWnd = WindowFromPoint(mPoint.x, mPoint.y)
    GetWindowRect mWnd, WR
    sx = WR.Left
    sy = WR.Top
    dx = (WR.Right - WR.Left) / ActivePresentation.PageSetup.SlideWidth
    dy = (WR.Bottom - WR.Top) / ActivePresentation.PageSetup.SlideHeight
End With
If dx > dy Then
    sx = sx + (dx - dy) * ActivePresentation.PageSetup.SlideWidth / 2
    dx = dy
End If
If dy > dx Then
    sy = sy + (dy - dx) * ActivePresentation.PageSetup.SlideHeight / 2
    dy = dx
End If
While dragMode
    GetCursorPos mPoint
    sh.Left = (mPoint.x - sx) / dx - sh.Width / 2
    sh.Top = (mPoint.y - sy) / dy - sh.Height / 2
    DoEvents
    i = i + 1: If i > 2000 Then dragMode = False: Exit Sub
Wend
End Sub

5、点击保存后,关闭代码模式,回到ppt设计页面。在你需要拖动的图片上点右键,选择“动作设置——单击鼠标——运行宏——确定”。

6、放映幻灯片,看看效果吧。

优点:可视性强。

缺点:对于PPT新手来说不易操作。

Atas ialah kandungan terperinci ppt怎么做拖动互动. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!

Kenyataan Laman Web ini
Kandungan artikel ini disumbangkan secara sukarela oleh netizen, dan hak cipta adalah milik pengarang asal. Laman web ini tidak memikul tanggungjawab undang-undang yang sepadan. Jika anda menemui sebarang kandungan yang disyaki plagiarisme atau pelanggaran, sila hubungi admin@php.cn

Alat AI Hot

Undress AI Tool

Undress AI Tool

Gambar buka pakaian secara percuma

Undresser.AI Undress

Undresser.AI Undress

Apl berkuasa AI untuk mencipta foto bogel yang realistik

AI Clothes Remover

AI Clothes Remover

Alat AI dalam talian untuk mengeluarkan pakaian daripada foto.

Stock Market GPT

Stock Market GPT

Penyelidikan pelaburan dikuasakan AI untuk keputusan yang lebih bijak

Alat panas

Notepad++7.3.1

Notepad++7.3.1

Editor kod yang mudah digunakan dan percuma

SublimeText3 versi Cina

SublimeText3 versi Cina

Versi Cina, sangat mudah digunakan

Hantar Studio 13.0.1

Hantar Studio 13.0.1

Persekitaran pembangunan bersepadu PHP yang berkuasa

Dreamweaver CS6

Dreamweaver CS6

Alat pembangunan web visual

SublimeText3 versi Mac

SublimeText3 versi Mac

Perisian penyuntingan kod peringkat Tuhan (SublimeText3)

Bagaimana untuk mengalih keluar tarikh yang muncul secara automatik semasa mencetak daripada edaran PPT Bagaimana untuk mengalih keluar tarikh yang muncul secara automatik semasa mencetak daripada edaran PPT Mar 26, 2024 pm 08:16 PM

1. Izinkan saya bercakap dahulu tentang kaedah yang saya gunakan pada mulanya, mungkin semua orang menggunakannya juga. Mula-mula, buka [View]——]Templat Catatan[. 2. Tempat di mana anda sebenarnya boleh melihat tarikh selepas membukanya. 3. Pilihnya dahulu dan padamkannya. 4. Selepas memadam, klik [Close Master View]. 5. Buka pratonton cetakan sekali lagi dan ketahui bahawa tarikhnya masih ada. 6. Sebenarnya tarikh ini tidak dipadamkan di sini. Ia sepatutnya ada dalam [Guru Edaran]. Tengok gambar kat bawah ni. 7. Padam tarikh selepas anda menemuinya. 8. Sekarang apabila anda membuka pratonton dan melihat, tarikh itu tiada lagi. Nota: Sebenarnya, kaedah ini juga sangat mudah diingati, kerana edaran yang dicetak adalah edaran, jadi anda harus mencari [Induk Edaran].

Kaedah operasi pemprosesan terhad digesa apabila membenamkan fon dalam PPT Kaedah operasi pemprosesan terhad digesa apabila membenamkan fon dalam PPT Mar 26, 2024 pm 08:41 PM

1. Buka PowerPoint dan edit dokumen PPT. 2. Cari fon yang tidak boleh dibenamkan, pilih kotak teks, klik kanan - Potong/Salin. 3. Klik kanan ruang kosong slaid dan pilih [Tampal] - Tampal sebagai gambar. 4. Mudah dan senang untuk menyimpan fon dalam bentuk gambar, tetapi fon tidak boleh diubah suai. Kaedah 2: Software FontCreatorProgram 1. Muat turun perisian FontCreatorProgram dari Internet, nyahzip fail dan pilih fail [FCP.EXE] untuk dipasang 2. Buka perisian yang dipasang, klik [Fail] - Buka - Font yang Dipasang dalam tetingkap bar menu, dan pilih PPT Untuk fon yang tidak boleh dibenamkan, klik [OK]. 3. Pilih [

Langkah terperinci untuk mereka bentuk ikon mentol dalam PPT Langkah terperinci untuk mereka bentuk ikon mentol dalam PPT Mar 26, 2024 pm 08:36 PM

1. Tekan dan tahan kekunci shift untuk melukis bulatan sempurna dalam PPT, kemudian salin bulatan sempurna dua kali, dan lekatkannya bersama seperti yang ditunjukkan di bawah. Perhatikan dalam gambar di bawah bahawa garis panduan biru betul-betul melintasi diameter tiga bulatan. (Perhatikan anak panah dalam gambar di bawah). 2. Langkah seterusnya adalah sangat penting. Masukkan trapezoid terbalik di tengah-tengah tiga bulatan. Sisi panjang trapezoid berada pada diameter bulatan tengah. (anak panah dalam gambar di bawah). 3. Jika anda melihat versi perspektif, sila perhatikan kedudukan yang ditunjukkan oleh anak panah dalam gambar di bawah. Tepat tangen kepada kedua-dua bulatan. 4. Seterusnya, laraskan butiran yang tinggal Sebagai contoh, sudut bulat di bahagian bawah mentol sebenarnya dilengkapkan dengan segi empat tepat bulat Kesannya adalah seperti berikut. Terutamanya separuh bulatan kecil di bahagian bawah diselesaikan dengan grafik arka. 2 point dalam gambar di bawah. 5. Selepas menggunakan anak panah arah untuk memperhalusi jarak antara grafik, tambahkan bentuk T di tengah.

Langkah terperinci untuk membuat carta alir blok berterusan menggunakan PPT Langkah terperinci untuk membuat carta alir blok berterusan menggunakan PPT Mar 26, 2024 pm 09:50 PM

1. Buka PPT dan masukkan antara muka utamanya 2. Padam kotak input Klik di sini untuk menambah tajuk dan sari kata, dan halaman kosong akan muncul. 3. Klik menu Sisipkan dan pilih alat SmartArt. 4. Klik Proses pada halaman Pilih Grafik SmartArt, pilih Proses Sekat Berterusan, dan tekan OK. 5. Masukkan proses blok berterusan ke dalam PPT. 6. Isikan teks untuk proses blok berterusan. 7. Jika kotak input tidak mencukupi, pilih bentuk terakhir, klik kanan padanya, pilih Tambah Bentuk, dan klik untuk menambah bentuk kemudian. 8. Masukkan kandungan teks untuk bentuk yang baru ditambah. 9. Pada ketika ini, proses blok berterusan telah dibuat dalam PPT.

Langkah-langkah untuk membuat carta garisan dan lajur bercampur dalam PPT Langkah-langkah untuk membuat carta garisan dan lajur bercampur dalam PPT Mar 26, 2024 pm 09:26 PM

1. Masukkan carta data ke dalam PPT dan pilih [Clustered Column Chart] sebagai jenisnya. 2. Masukkan data sumber dan gunakan hanya dua lajur data Sebagai contoh, lajur pertama ialah data bulanan dan lajur kedua ialah data kumulatif bulanan. 3. Tukar jenis carta siri data kumulatif, klik "Tukar Jenis Carta" di bawah Alat Carta, klik [Gabungkan], pilih carta garisan dengan penanda data untuk data terkumpul, dan semak paksi kedua 4. Selepas mengklik OK , anda mendapat grafik gabungan asas 5. Tambah label data untuk carta lajur dan carta garisan Dan tetapkan warna yang berbeza untuk menunjukkan perbezaannya.

Kaedah terperinci untuk mencipta kesan animasi pemadaman jari teks dipaparkan dalam PPT Kaedah terperinci untuk mencipta kesan animasi pemadaman jari teks dipaparkan dalam PPT Mar 26, 2024 pm 09:46 PM

1. Buat persembahan PPT baharu, pilih kotak teks mendatar dalam menu sisip, masukkan kotak teks mendatar pada halaman slaid, dan masukkan kandungan teks dalam kotak teks. 2. Pilih kotak teks yang dibuat atau pilih semua kandungan teks dalam kotak teks Di bawah menu mula, tetapkan fon teks, saiz fon dan atribut fon teks yang berkaitan. 3. Cari gambar dalam menu sisip, klik gambar, pilih gambar material jari yang anda jumpa sebelum ini dan import ke halaman slaid, pilih gambar yang dimasukkan, kecilkan kepada saiz yang sesuai dan letakkan di tempat yang sesuai. kedudukan. 4. Pilih kotak teks, klik pada menu animasi, cari kesan animasi [Erase] dalam menu animasi, klik Padam untuk menggunakan kesan ini pada kotak teks, dan tetapkan arah animasi pemadaman kepada

Langkah-langkah untuk menyatukan warna tema slaid PPT Langkah-langkah untuk menyatukan warna tema slaid PPT Mar 26, 2024 pm 08:51 PM

1. Skema warna secara semula jadi berkaitan dengan reka bentuk, jadi kami klik pada bar alat reka bentuk dan di sebelah kanan, anda boleh melihat pilihan warna. Halakan tetikus ke atas, dan anda boleh melihat bahawa warna tema semasa ialah: Templat reka bentuk lalai 1. 2. Klik pada pilihan ini dan yang pertama ialah reka bentuk warna semasa. Untuk mengubahnya, kami akan pergi ke bawah panel: Warna Tema Baharu. 3. Klik masuk, dan dalam lajur warna yang muncul, anda boleh melihat bahawa terdapat tiga warna teks aksen, yang semuanya ringan dan hampir mustahil untuk dipaparkan pada latar belakang yang terang. Antaranya ialah warna teks dalam contoh ini. 4. Klik anak panah lungsur di sebelah kanan warna untuk memaparkan panel pemilihan warna. Untuk tidak memusnahkan padanan warna keseluruhan, pilih warna gelap dalam sistem warna utama untuk menggantikan warna utama. Gantikan dua warna lain dengan cara yang sama. 5. Bandingkan warna yang ditukar dengan warna asal. Di sebelah kiri ialah

Bagaimana untuk menangani kod ralat 0xc0000022 apabila PPT tidak boleh dibuka Bagaimana untuk menangani kod ralat 0xc0000022 apabila PPT tidak boleh dibuka Mar 26, 2024 pm 08:10 PM

1. Pilih pilihan dalam fail. 2. Pilih Tetapan Pusat Amanah dalam Pusat Amanah. 3. Tandakan pilihan berkaitan Internet dalam Paparan Terlindung, klik OK dan kemudian tutup dokumen semasa dan buka semula. Nota: Kaedah ini telah dicuba tetapi masih tidak berfungsi mungkin terdapat masalah dengan dokumen itu sendiri.